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Win a poclcet TV1 


82 


AU you have to do to eater is solve w 


IT piyglft 


FBSE Price of Maglk poster 


34 


The game iB coming soon, get your poster now! k 


Tnbular Bells Poster Offer 

Send lor your FREE poster. 
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FROQRAMS 




1 Bertie Bishop/Spectmm 


681 


1 The Cuba/Amsfcvad 


71 


1 ItfMTAT'/flTllil'll.PIIIII 7S 1 


1 The EBtUe/C64 
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ready for take-off 

Ulrrorsofti are just eddlng Oie 



s tbree parte to Uie game 
andajlinustbecioinplstedlf 



are tranapOFted to another 
In the first part :;ou must pilot 
roprhlplane behind enemv hnee. 






Ulrrorsoft under 
label lea bail game 
Ran«t. Onenaity 






Bod Flke IB getting his te[ 
hie neict C3Ut adventure r 
taeed on the onginal 
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Sagitairins the 
Arclier 

Sb&k£ctfc}utjnaodofgkiom«nd 
dMpondencr. doc really 

sr?’si.r=”i; 

Bperidlng person&Uty fbr you to 
be so eripv acd urttable 
Psrbftpe you etuuld tiy a 



- a compuCvyeUiiig 
t brl^ moTlD^ 
« speedUy balbre 
012 abould by and 



retraokttoot^tisuc TaUTUS tlie BoJl 



3t whM oante nghl look oi 



Vis^o the Virgin 

J am the bearer of greeClD«B to 
you from the ana who eaiia 
himaelf the JUI Powerful. 
OjermlgHy, King of the Tar 




{Mietdla. Don't lead aDyooeyour 

TTltUna IV. tWie vary 

I aceal your UmrtlgltC and 



Cancer Uie Grab 



Ik game of Teirors^ooj la 
-'•ir or psrhape you ahouM 
1 oiABide the Jumbled 

elaghrapseaiatae 



. haliy 

the landed firods. are 
aroundytTuandtharer" * 



Libra the Scales 



then, and only then win you 
achieve your idthnala wlah. Put 
Lhcee peat failurea behind and 
-wipe the elate olean. you win find 
yourself a changed person. 

Pisces the Fish 

The wet pTai-xe. of Venue is 
dnfilng out of your Ohan and the 
diy axidfly of Mere i '• ' 
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"“GRAPMrC 

ADvenTURff 

CRCATOR 






™®GRAPHIC 

ADvenruRG crgator 



The amazing, combined text and graphioadventu re generator enables 
you toproducefast compact adventu re garrtes with the minimum of effort and 
the maximum of creativity. Stunning graphics can be created quickly and easily 

with the powerful picture generator that has many features indudirig;-doi 
drde, elastic line, ellipse, fast fill, shading, step by step review, easy editing and 
the ability to merge pictures. 

The compiehenave, intelligent command interpreter can handle complex 
sentences and multiple input commands. There is also an extensive text com- 
pression facility that allows you to produce far more detailed and numerous 
location descriptions. Plus a full function editor, automatic word formatting, a 
logical command interpreter and an abbreviated input acceptince facility. 

So unleash the power of your imagination now with The Graphic 
Adventure Creator, for your Spectrum, Commcxiore 64, BBCBor Amstrad. 
Available from all leading retailers or direct from Incentiw on 0734 591678. 
INCENTIVE SOFTWARE LTD. S4 London StreetReadingRG14SQ. 



Fnease rush me.THEGRA PMiC 
■ ADVENTURE CREATOR I ' 

□ Commodore 64 I . 

□ Spectrum DBBCB GAmstrad 

□ Cassette £22.95 

□ Disc £27.95 (All formae except Spectrum) 

I endose Cheque/ PO for £ 

or please d^it my Credit Card 

No 
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SPECIAL 
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MJaltIftli 



gamabuifiufbrssllgbt^ft^TTiLpoOTgraplUc 

PWHET RlOTNQS 

Onsnalttgr g^i 

QraphUa 0, 

TTse crfiT TAnhlrm 0001 

VUue&fman^ 00004 

STASHATIHO 



l^rldCop 

ConjotTK Snarn.inmi <inar .fi 

8iq>pliw;Aitl£ 

MMisese 

OooJMnb The fbrarunnar to World Cm Z 

aUU ftvuiabls £br tibeee 

aoUona s liuie aloww tan tliat’s town to the 



which you trmld ft teitm to wuuhe leetfto. 

PLANST RATniQS 



Qraphlca 
Ttfle frf mo/Vhlrwi 

Value Armour 



of pliQwra due to Qolourclftahtng 

HANBTaATIHQS 

Onguieuty 

Haeafmftoluna 



STAHHATIWC 



World Onp footbaU 
8tt^Un Macmlilan 

Part or a World Cup InJbrmactcii 
peak, the txK* Is eitoeUenl, unJorUmataly 
Che game Is dreadlul. 

FLAtfSTRATOJOe 

On^lnslt^ 00 




Use of machine 00W 

Value Cot moin7 g 

?EABitATTnO 1 I 

BlftOkHole 1 ^ 1 


Intei-wtSnnj] Booeer 
Computer Ue4 
Bttp^ler: Commodore 
PHse; 81196 

OommentiThsfcmfioffoothftUaaaoiigamss, 
BO good that 11 la used to demonatnated C64’e 
PLAHET HATtlKH 

Onginaiicy 000 

^phiOB 00000 

Pea of machine 0000 

Valus Ibr money 00000 

BTABRATUra ■ 

WOVB I'^l 
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The year is 8001 (strains of 
^The Blue Danube’ start to he 
heard) and you are a bounty 
hunter pursuing four alien 
criminals. Shades of Elite 
meets Blade Bunner? 
Perhaps not, but Mihe 
Boberts tur^ mercenary 
for the occasion just in case. 
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10 levels of fun make this torture excellent value 
for money. Nova rating. Definitely one of those 
■just another go' games. Came of the month 
February" - Computer Gamer 
"The most compulsive game I’ve ever 
played. If you don't buy It you'll never 
know what you've missed." says Cary 
Penn. Zzapi 64. Gold Medal Award. 

97% overall. 

CBM 64/128 SPECTRUM 48K 

£9i95 £795 

MSX 
£a95 



AMSTRAD 

DISC TAPE 

£1195 £195 



be 
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sc&vonftng ansmy droids. Tdie 
problem oomes wtcii the codee, 




at hl^ speed, another note le to 
go tng out of 

B j. aujfl note Cbog) if you dls 
with autofire ael&ited. you wUJ 
restart with it selected — usually 
the result Is an early demise due 

Weapomy Is also Istel 
dependent, that's why I like the 





PLANET BATIMGS 




GOC 

< 

AMPL 

SPLIT 


0 

— 

FIER 

ER 


BAD 

K 


^ TERMIN 

JOIN 

c 

INVER 


ATOR 

ER 

:) 

TEH 


More comp 


IX systems 




aTAERATIHG 





Sports simulations 



MEXICO ’86* 
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The C16 Collection — 10 games no 
C16 owner shonld.be without. 

try Rory and Alex Newman 
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i approsSiin* but be warned, 
not atlanqjt to blast It away 
ausB, If you glide slowly up 
uml It, you begin to refuel; if 






Simulator 



At a rpncli glance Barks 3 looks 
rattier like Berks 1, but take a 

cloear lookandycruTl eeettisre is 
a lot mere to Berks 3 than roeeta 
the eye. Ones again you take the 
form of the Terror Tank blasting 
through every known Berk ( stm 
protected ty the dresdsd drones) 
but this tute you are In the Berks 



! games fbr the CIS. 



of the OwoyouwUl 
! there Is nothing to 
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DON’T MISS OUT! I 

Now tbat you have read this Issue 
Computer Gamer and you know how 
Intereatlng and Invaluable It is, wouldn’t It be 
a crime to run the risk of missing a single 
thrilling issue? 

Well, you don’t have tol 

If you order a subsorlption to Computer Gamer 
you will be assured of receiving every issue 
through your letter box each month without 
the worry involved In rushing to your local 
newsagent before all your friends have nabb- 
ed the available copies. 

Simply fill in the coupon and send it in with 
your remittance and sit back and wait for 
thrills and excitement to come directly to youl 

Subscription Order Form 
Cut ont and tend to: 

Computer Qamer 
Intonet Ltd., 

Times House, 

179 The Marlowes, 

Hemal Hempstead, 

Herts. HPl IBB. 




Please commence my subscription with the 
very next Issue. 



Subsorlption Bates 
(tick □ as appropriate) 



£16.60 for 12 Issues UK □ 

£ 21-60 for 12 issues overseas surface post □ 
£28.00 for 12 Issues USA surface post □ 
£57.00 for 12 issues airmail □ 



1 am enclosing my (delete as necessry) 
oheque/Postal Order / International Money 

Order for £ 

(made payable to ASP Ltd) 

OR 

Debit my Access D BarclaycardQ 

M il l 



Please Use Block Capitals and include post 
code 

NAME (Mr/Mrs/Miss) 

ADDRESS 




POST CODE 

SIGNATURE 

DATE 
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around £7.X 
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Explore an ancient toml) in our latest paper and 
pencil adventure 







S. TCere an two torohes atnva a 
pUtvire of a largB moDk^. So 

iSatafthanltoroh— 19 
Tha right hand taroh— 81 
BothtogaOiar — 38 




tuns such as half mac, half 
iBopard. The doors swing 



open at TOUT touohreTBBUng 
and ;ou can hialu out a pair 
of omafal; carved ebony 
Insight Jackals, inlaid with 





8. Tou manage to grab hold of 
the handles and swing Into 

the passage to the hotth. Vou 
will not he able to return this 

way. 
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nVE^TllRE 



Gordon Hamlett brijigs back 
the art of conversation to 
your adventures. 



T 



S)ungeon 
. Shressing 
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PBMmm 

MUce McGarry brings 3nni 
the latest PBM news and . 
includes some hints for It s a 
Crime players. 
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iHc^vvi on tlic 



SPECTRUM 48/128K' 

OBMM/m £9- 



THE DOUBT OF 
RABAK 



BEFORE THE GATES 
OF WOLFDORP 



OLD TROLL! 



SCREEN SHOTS FROM 
THE SPECTRUM VERSION 



BEWARE OF THE 
WEREWOLF! 



FromOMOOiOVLe 
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- the GAMEM ASTERS 



Hc^vv| on the 
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GARGOYLE GAMES LTD., 
T«' ■ 



74 KING STREET, DUDLEY, WEST MIDLANDS DY2 8QB 
: (Sales) 0384 238777 (General) 0384 237222 



MAGOT 
THE PRINCE 



CONVERSATIONS 
WITH APEX 
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CONSTRUCTION SET 
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' TXIS MUST BE THE ULTIMATE < 
ALL STRATECV GAMES ... 

EXCELLENT.’ 




COMING SOON_. 



22 PNyrn 'Log« 
K CoimninUi 



•Ip or IwltM mil THE DOUBLE. Cirmil progrpmn 
Id luiA U you w ill imd iRuiinm ind a Managan 
anoa Admimnration. StaHS Playara. Wagn & Tn 
’ Coinrol. Policing. Scout*. FInar 

iTloT? Individual playai 

aiof ALL THREE DlvSsidSfe araat yM^dlapM 



HOWARD KENDALL da 






COMPETITION... COMPrrmON... COMPETITION... 

DOUBLEyouwlllWINA 



JOHNSON £10.95lnc,uCngL 

SCflIilflTHOg 

COMMODORE 64, ATARI 



SOFTyflRElwEGUME 

5fl775Fflfr/0/Y|&£4fl 
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If an advertisement 
is wrong we’re here 
to put it right. 



If you see an advertisement in the press, in print, 
on posters or in the cinema which you find 
unacceptable, write to us at the address below. J 

The Advertising Standards Authority. 

ASA Ltd. Dept 3 Brook Houac.Tomngion Pbca. London WCIE 7HN 




BINDERS 

FOR YOUR VALUABLE 
COLLECTION OF 
COMPUTER GAMER ^£5.20% 
MAGAZINES t me I 

•SMART -EASY TO USE 

•TOP QUALITY ■ 



To «P ^adara SarvIco.^PO Bo«^35, Wolao^ 
HP2 4SS (0442-41221) 





ArlDlaaoft’B anliy into 



ars twtaf biownlbraar 
- cartrUgBs ) and taJwa >ou 



ball Uwn cantrol swltohsB to ttie 

the ball and tftraoo far mtSot 
i«nlaaapoasibla. 

In dafenta you oontrol one 
player who bestcolly stops any- 
thing the oomputer oontroUed 
ones let through. Dr it you're 
feeling breve you oan go far the 

What the oomputsr controlled 
players aotuaUy do depends oj 
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PL/WERS C^WE 



In a special coin-op feature, Tony 
Hetherington accepts the 
challenge of Atari’s Gauntlet. 










Can Ybu 




sold, calculated and sent out 
promptly every three months. 

In certain cases advances are 
also paid. Tim Tyler^s Repton 
games have earnt him over 
£30,000 In less than a year — 
quite a sum for a 17 year old, 
and Deathstar author Peter 
Johnson has earnt almost 
£35,000 with ua 



Marketing Advantage 

□ urroyolty payments 
show that our authors 
have benefitted from 
professional packaging, point-of- 
sale material for retailers, 
carefully placed full-colour 
advertising and effective 
communication with both trade 
and consumer magazines to get 
the maximum coverage! 



If you can, Superior 
Software has something 
important to say to you. 

Introducing Ourselves 

n hree years ago Richord 
Hanson set up Superior 
Software to meet the 
growing demand for high 
quality games and educational 
programs Now, 88 releases 
further on, Superior has 
established itself as the leading 
software house for BBC and 
Electron computers wifri top- 
selling releases such as Repton. 
Deathstar, Citadel and SPEECHI 



Exciting Opportunities 

□ s part erf its continuing 
program of expansion, 
Superior Is looking for 
top programmers of ALL horrte 
computers to write original 
software and to produce 
conversions We are also looking 
tor games designers, graphics 
artists and computer musiciarte 
who would like to be involved In 
some fascinating projects 



Top Payments 

□ ur authors are paid on 
a royalty basis receiving 
80p for every cossette 



FREE Guidebook 

n fycu would like to be 
part of our continuing 
success please call 
Richard Hanson In confidence 
on 0532 459457 or 459453. 

Or write to the address below 
for a FREE copy of 'Superior 
Software's Top Tips tor Games 
Authors". This informative and 
useful booklet is in limited 
supply, so send for your 
copy now. 



Limited 
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Kw&fcRy nmSjWT uf5tT HIM. 



wp •<oj 

To Go ^^i? C#UWf*J 

{•SU6n«L^A?'.fc^ ^ 
M C>/fJr'. I 

SlMEeLAO-- JiM 



PitAM! MKEToStt’ 
'rt-ui -mwit youM, 
IN'IVTINO 






SUES QUAD 

souM^perr! 



[C»iE AM£fW6 W 
rt*A4TAFAH; 



ORTSN'DUTO'! 



Please sene me the item(s) ticked below. I enclose e CHEQUE/PO 
payable to- OUTOMOTfi Ltd. PO Box 70. SDUTHSER. Hants. PO* gSL. 
all prices include VOX * Carriage within U. K. OVERSEAS ADD SI. 



lO PACK vol. 1 
SPECIAL OFFER! 
"lO PACK" 4ai< 



Advent u res, St rate 
GO TO JAIL. 40K Spe 



:7 lO PACK vol. 2 «7 lO PACK vol. 3 £7 

Buy all THREE "lO PACKS" tapes for ONLY £15 

5PECTRUM tapes contain lO programs offering real 
{— M/C Arcade Games, Graphic and Text 



Games, & lots 



NOW £4 



SPECTRl'M SPECIAL OFFER! BUY ALL ABOVE SPECTRUM TITLES! £20 
Name Add ress 
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aAVOID THE MONSTER RUSH FOR 
THE NEW 



£15.00 tor 12 issues U.K. 

£18.00 for 12 Issues Overseas Surface Mail ”2 
£61.20 for 12 issues Overseas Airmail 

Send this form »iih your remiiianre lo: 

IStVSET LTD.. rimesHouse, l~9 Tbe Marloiies. 
Hemel Hempstead. Herts. HP! IBB. 





MICROPOW® PER • GAME 



Amenama Software, all American action at a superb 
value for money price of only 



COMING SOON 



SLAMBALL 

COMMODORE M/fe 



COMMODORE 64/12B • ATARI 



COMMODORE M 12S 

SHAMUS 

COMMODORE 64028 • ATARI 

SCOOTER 

COMMOIXJRE 64/128 • ATARI 

OLLIES FOLLIES 

COMMODORE 64/128 • ATARI 



LICENSED TO THRILL 



SOFTWARE 
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IP Indexed informaidon absut all 

1 Q the fecets of life on the planet 




Amstrad. tjtfiiriiy CRL gave me their venoue etrengthe and 






dlsk?Here'etheansirer.thedlek en added extra and produeee 
verstonofthegamelemorethen piectsrinneme. Theyweregolng 




amount of added extrae. on the dlaU Buts nsTer fsar. 

' Ihs planet Is atiout tirtce as Computer Gamer comae to Che 

paae, that can te gol to with will he printed ae a UsU^ln*a 




thejump urats excallent ganid then Tau CWa — 

1 There are more huildinge, The Special Edition le an inored- 

robot tedtonee (excseelvely idle game No Amstrad dish 
1 dangerous - don'tgoneapthem owner ahouldhentthout it'lI.IL 




help the (ortreesee aim at you 

(and are aitram^ dlfBoult to PLANET BATENQS 




buddings and surface feetures Onglnalltgi •ai*** 

like eruftlng volcanoee. Graphics ••••• 

Some of the extra building Useofmachlne ■•••• 

you eocees to the galacUc dsta 




vaults have the extra equipment |£]^l 

in them and the llbraty com- Supernova L- 1 
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socunly You plao' bhs 

part of EddlflonCartar'8 oonCrol* 
l«r, UTlngto gnu Che not ofiha 

wire g^^Uos f^utn^e ahn) 
and IB Icon controUed falmoet, 
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by Robert PlUdngton 




1 P0K£ 2JtSB,8 
5 UT hljli'O 
t Ifl Ciil=0 

7 PRINT AT 10, f{ INK A; 'BERTIE BISHOP 

9 LET pt*'. L' 

10 Sin EI24I: DIN R(24)i Din BIAS): SI 
R L(43n SO SUB 9000 

i: BDRSER 7: PAPER 7 
20 BRI6HT 1 
2S CLS 

40 BO SUB BSOO 

50 FOR n=l TO 10s BEEP ,05,(-20-eli HE 
IT n 

51 LET liv(i>0 

53 LET *CDri»0 

54 LET c'OH'O 

55 FDR 2>1 TO 5 

56 LET x*2! LET »*2 

57 PAPER 7 
5B BORDER 0 

59 LET ;dxINT (RHD>16«SI 

60 BRISHT 1 

62 IF 203 THEN LET >iip>0 

63 LET out-0 

64 LET under‘0 

65 CLS 

66 INK Oi PRINT AT 0,26;' THE *: PRIN 
T AT l,26l‘DEVIL!'l INK 4 

67 IF ciU>«i THEN FLASH Ii PRINT AT 
S,26rCALLED': FLASH 0 




■ 70 PRINT AT 2|26i INK 2i',i'i INK 4j' 

ROOH'; INK 2i'M'i PRINT AT 3,28!2i PRI 
NT A 

T 4,26) INK 2|*m*j INK Ai'CALL'j INK 2 
!'M'; If ull=0 THEN FLASH ll PRINT A 
T 5, 

27i'0KAVi FLASH 0 

80 BRIEHT 1: INK 0) PRINT AT B,26|'SC0 
RE' 

lOO FLASH l! INK 3; PRINT AT 10,27i'H]6 
H'l FLASH 0 

120 INK 0; PRINT AT 12,26i'LIVES‘ 

130 INK 4 

140 PRINT AT 13,26)'Ml=;ntP'nil. 

.IL'GDCU': IF 

livoiM THEN P 

RIKT AT 13,26|' ') PRINT AT 14,26)' ' 
145 IF hyes*2 THEN PRINT AI 13,26;’ 

■l PRINT AT 14,26)' ' 

150 INK 3: PRINT AT 16,26)'lWi!l m IM 

n I N S B Bl 

B H i B 9 B 
XHBMiM 
"VMBE 

r uKr 

155 FOR 9°1 TO 2 

156 IF gxi THEN LET 6[°0 

157 IF ;<2 THEN LET ic>24 
160 FOR n<0 TO 21 

170 LET rAnMNT IRND*2) 

180 INK 2i IF rari>0 THEN PRINT AT n,at 

190 IF rjn*! THEN PRINT AT n,»c)'c-' 

195 BEEP .0S,n*2 

200 NEU R 

210 NEII g 

220 FOR n*0 TO 24 

230 LET ri)i>INT (RNS«2) 

240 IF r»n*l THEN PRINT AT O.nj'r ■ 

250 IF rin*0 THEN PRINT AT 0,ni'-. ' 

260 BEEP .0S,r;2 

270 NEIT n 

300 FOR N>0 TO 20 

310 LET rn>INT 1RN0»2I 

320 IF r6R*0 THEN PRINT AT 21,n;’r' 

330 IF fjtfl THEN PRINT AT 21,«|' ■ 

340 BEEP .05,0 
350 NEIT n 

360 INK 6i PRINT AT 21,21)'i ‘-h' 

370 FOR TO 20 

3B0 BEEP ,005,-n 

390 NEIT ri 

400 FOR n»l TO 10 

410 BEEP .0I,20*n 

420 LET IR'INT (RND422M) 

425 INK 2 

430 PRINT AT IO,«;'t.-' 



440 NEIT n 

500 INK I 

501 PRINT AT 9,27)scoc 

502 PRINT AT Il,27)ni9ti 

601 INK 4) PRINT AT i.yi'ni?.'; INK I: 
PRINT AT itl,y|[it 

602 IF i(<2 THEN INK li FOR n<l TO 3i 
LET ))>INT IRNDil7t2li PRINT AT tlnl,p|‘k 
»'i NEIT n 

603 IF 2)2 AND 2 <S THEN INK 3; FOR n>l 
TO 4: LET p>lNT <RND<17»2I) PRINT AT h( 

NEIT n 

604 IF 2>4 THEN INK li FOR nM TO 5i L 
ET p^INT IRND«17»2)i PRINT AT Nlnl,p;’HI 

HI 

'! NEIT n 

615 IF !°2 THEN 60 SUB 3000 

616 IF 2<3 THEN 60 SUB 3040 
620 LET zf'INKETt 

630 IF 2f:'S‘ AND ATTR («,y-l)0122 OR 
zM'D' AND ATTR l.M,y-lK)122 THEN 60 
TO 1000 

640 IF zl*'E‘ ANO ATTR l«,y*2)0122 OR 
il*'E' AND ATTR (>*l,y*2IOl22 THEN 60 
TO 1200 

650 IF 2 l--'P' AND ATTR (x-l,yl(>!22 OR 
2 $«'P' AND ATTR («-l,y*l)0122 THEN 60 
TO 1400 

660 IF AND ATTR U*2,yK>l22 OR 
2 l»'L‘ AND ATTR (j*2,y«noi22 THEN 60 
TO 1600 

665 IF 2»-'C THEN 60 TO 9900 
670 60 TO 4000 
1000 60 SUB 2000 
1010 LET y«y-l 
1020 60 SUB 9500 
1030 60 SUB 2200 

1035 INK 4: PRINT AT j,y[Vnh .'i [NK 1) 
PRINT AT «*l,y)'i ■ :.'i LET p$='cs’ 
1040 SO TO 499 
1200 SO SUB 2000 
1210 LET y=y*l 
1220 SO SUB 9500 
1230 SO SUB 2200 

1235; INK 4| PRINT AT i,y)'Mii:,') INK 1 

! PRINT AT »4l,y(’TD't LET pl=’ i i' ' 

1240 60 TO 499 

1400 6D SUB 2000 

1410 LET <H-1 

1420 SO SUB 9500 

1430 6D SUB 2200 

1435 INK 3; PRINT AT «,y;' , i i-.'i INK 1; 
PRINT AT «t|,yi'' LEI pM'Cl.' 
1440 BO TO 499 
1600 60 SQB 2000 
1610 LET >>>n 
1620 SO SUB 9500 
1630 SO SUB 2200 
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1635 iw; MINT ST INK li 

SSINT ST utl.yi’i.-c:,'*! LET p»** ■' ■ 

1640 60 TO 494 

2000 PRINT A ..V[’ 'i PRINT ST 

2010 RETURN 

2210 FDR n:l TO Izt3) 

2220 LET i«>INT (RNDt20H) 

2230 LET yeMNT (RN0i23Ml 

2240 IF >e>< AND ye^y THEN 60 TO 2220 

2255 INK 2i PRINT ST i»,y6i‘t- ' 

2260 REIT i> 

2261 LET 40 ‘INT IRND*I2»7I 

2265 LET icQre>icor««2 

2266 IF t<>2 AND go<> THEN 60 SUB 9980 
2270 RETURN 

3000 INK ll IF cross>0 THEN PRINT AT 10 
.24i'..,' 

3010 IF ««10 AND y«2»24 THEN LET cross’ 
erossHi BEEP .25,10 
3020 IF cross>’l THEN INK 2; PRINT AT 1 
0,24|*c ■ 

3030 RETURN 

3040 IF «ltpM THEN RETURN 

3045 If y<2 THEN RETURN 

3046 IF <<6 THEN RETURN 

3047 IF y>22 THEN RETURN 
3050 LET .SA’INT IRND«ISl 
3060 IF v6I’5 then SO TO 30B0 
3070 RETURN 

3080 INK 3l PRINT AT »-3,yi’H’: INK Oi 
PRINT AT K-2,y-li'iJ«i‘i IW 2i PRIN 
T AT « 

-i.Yi' - ■ 

3090 LET viip‘1 

3100 BEEP .25,-10i IF tross>=l THEN BO 
TO 3200 

3110 FOR n>l TO 10: BEEP ,5,-n: NEIT n 
3120 LET viip’ll 60 TO 4000 
3200 INK ll PRINT ST «-l,y)Vj‘ 

3210 FOR nsl TO 10: BEEF ,S,n: NElT n 
3215 BEEP 1,20 

3220 PRINT AT «-3,yi* ’: PRINT AT «-2,y- 
ll' ■: PRINT AI >-l,yi’ ■ 

3230 RETURN 

3500 as : INK 0: PRINT AT 2l,0;'<MflUe 



3510 INK 2i PRINT AT 16,12)' 




3520 INK 4: PRINT AI 19,13j*i=HFi*: INK 
ll PRINT AT 20, 13)'- L' 

3525 IF !<5 THEN BEEP 1,10; aS : NEIT 

3527 60 TO 9530 
3530 BEEP 1,10: CLS 
4010 LET li.M’lives*! 

4030 FDR n»'10 TO -20 



4040 BEEP .5,n 
4045 BEEP l,4i BEEP 1,7 
1050 NEIT n 
4060 INK 3 

4070 LET lin’Uvest? 

4080 PRINT ST 15,24Hinj',»' 

4090 FOR n=-20 TO -25 
4100 BEEP .S,n 
4110 NEIT n 

4120 PRINT AT 14,24*(in)' W 
4130 FOR n=-25 TD -30 
4140 BEEP .S,n 
<150 NEIT r 

<160 INK 4: PRINT AT 13.24Uin)' ,jl' 

4170 FDR n»'30 TO -35 
<180 BEEP .5,i< 

4190 NEIT n 

1195 BEEP 1,10: BEEP 1,5 
<210 INK 3 

4220 PRINI ST .n,y)'h ' 

4230 BEEP 1,-30 

4240 PRINT AT «»l,yi'i > * 

<250 BEEP 1,-25 
4300 PRINT AT «,yi'i ' 

4310 BEEP 1,-20 

4320 PRINT AT »,y)'i > ■ 

4340 FOR n«l TO 20 
4350 BEEP .001,20m 
4360 KEIT n 

4365 IF livasl<3 THEN 60 TO 5000 
4370 CLS 
4360 60 TO 56 

5010 PAPER 2i BORDER 2: INK 7 
5020 PRINT AT 9,0 
5030 CLS 

5035 PRINT AT 10,l5j*.-)S 
5040 FOR TO 5 

5050 BEEP ,2,-10l BEEP ,2,-9: BEEP ,5,-1 
0 

5055 NEIT n 

5060 PRINT AT 9,IS)‘l^ 




5065 FOR A<1 TD 2 
5070 BEEP .5,0: BEEP .5, 2-. BEEP .25,3: B 
SEP .25,2! BEEP .5,0 
5075 FOR n=l TO 2 

5080 BEEP .5,3: BEEP .5,5i BEEP .5,7 
5090 KEIT n 
5100 FDR n>l TD 2 

5110 BEEP .32,71 BEEP .12,6: BEEP .2S,7i 
BEEP .25,5: BEEP .25,3: BEEP .25,2; BEE 
P .5,0 
5120 NEIT n 
5130 FOR nM TD 2 

5140 BEEP .5,0: BEEP .5.-5: BEEP 1,0 
5150 NEIT n 

6010 IF hlgM’score THEN LET lugh’scurt 
6020 CLS 

6030 BORDER 2i PAPER 7; INK 1 
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6040 FLASH 1; PRINT AT 10,19)'H16H SCORE 
I’: FLASH 0 

6050 INPUT 'TOUR HSHE lS’>‘|(tl 
6060 IF Higir-score THEN LET h$’nt 
6070 FLASH 1: INK <i PRINT AT 15,14|‘Br 
I PRINT AT 16,115-ILEN hdSlljht 
6080 PRINT AT 18,U)'TQUR SCORE': PRINT 
ST 19,14|score 

6100 FLASH 0; PRINT AT 2I,9|‘PRE5S A KEY 
PAUSE 0 

6110 LET scsrt’O: LET llvtS’O 

6115 LET cill’O 

6120 60 TO 50 

6500 PAUSE 100: PAPER 6: 

BSOS CLS 

6510 BRI6HT 1; INK I: PRINT AT 1,0)' YOU 
ARE BERTIE-YDUR H1S5I0N IS'"* TO ESCAP 
E THE PRISON IKE EVIL’’ " DEVIL HAS PUT 
YOU IN. THE DOOR IS OPEN BUT AVOID' 
HITTIKB NAUS OR KITT1N6 2 PQIS 
ON APPLES AT ONCE (NHICH"“ POP UP ON E 
VERY NOVEIl ""YOU CAN SPLAT POISON SP 
PLES IF "" YOU ONLY HIT ONE A! A TINE' 
OON'T STOP OR YOU NILL DIE. NHE 
N YOU LOSE A LIFE NATCH THE DEVILS 
HAND (AT THE BOTTIIN ' " RIST OF SCREEN 
I AND THEN SEE"" YOURSELF BURN UP! 60 
UNDER THE"" ARCHHAVS INTO THE 5 ROONS 
■••• AND OUT OF THEN TO NIK.' 

8511 PRINT 

8513 PRINT ‘ THERE IS ONE THINS THAT CAN 

HELP YOU! HICHAEL HDHK. NHEN " " 
YOU PRESS ’C’ HE NILL FLY JUS" " BEION 
YOUR FEET AND CLEAR THAT"’* RON OF APPL 
ES'! BUT HE CAN ONLY" " BE CALLED ON DN 
CE. HERE'S A '"' PIECE OP ADVICE SAVE H 
IN TILL"" A LATER SCREEN BECAUSE OF TK 
£"" RUCK SRESTER AHUUHT OF " " APPLES 
. ITS EAST TO SET TRAPPED'"' ON 4 i 5i' 

8514 PRINT : PRINT ' AS YOU HAVE SECRET 
NEAPOH SO'"' HAS THE DEVIL!! BEETLES!' 
" " IN ROONS I A 2 YOU NILL " " SUDDEN 
LY HEAR A SEEP LASTIN8'"' JUST OVER HAL 
F A SECOND. ""YOU NILL SEE BEETLE AND 

IN THAT"" TINE YOU RUST PRESS 'H' TO 
TAKE"" FROH YOUR POCKETS A PINEAPLE'" 
• (LEFT OVER FROH LAST YEARS "" HARVES 
T FESTiVALl THAT NILL"" SPLAT BEETLE A 
ND YOU KILL BE'"' SAVED. IF YOU'RE TO S 
LON THEN " " HE NILL LOSE YOU A LIFE!!' 

■ RENEKBER ONCE YOU'VE SOT HIN" " BE 
QUICK BACK ON A HOVINE"" KEY OR ITS A 
LIFE 60NE. THERE’’" NIU E RORE BEETLES 
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9UB FOR S>1 TD 24: READ BIS)| NE(T S 
9169 tATA 7,7,2,7,0,2|-S,2,2,7,2,9,7,3,4 
.2, (1, 2, 7, 7, 2, 7.7 

9174 FOR QM TO 24s READ E(0)s REIT B 
917! OATA 2, 1,1, 2, 4, 4, 4, 8, 1,1, 2, 1,1, 2, 2. 
1, 1, 2, 4, 2, 1,2, 4, 4, a 

9176 DIR il3)s DIR hI4)i DIR i(!l 

9177 FOR n>l TD 3s READ llnis REU n 

9178 DATA !,ll,l! 

9179 FDR t)«l TO 4l READ hitlll REIT n 

9180 DATA 12,4,17,8 

9190 FOR n*l TO S; READ >(nli REIT n 
919! DATA 6,1B,I!,10,3 

9196 FOR i<] TD 4Si READ Eli); REIT i 

9197 DATA 7,7,9,6,7,9,11,11,12,11,9,7,9, 
7.6,7,7,9,11,12,14,14,14,14,12,11,12,12, 
12, 12, 11, 9, 11, 12. 11, 9,7, 11, 12,14, 14, 12,1 
1,9,7 

9198 FOR lt<l TO 4!s READ Ll«)l REIT d 

9199 DATA .!,.!,. !,.!,. 2!, .!,.!„!,.!, .3 
,.2!,.3„3,,!„5.l,,2!,,2!,.2!,,2!..!,.3 
,. !,.!,, 2!, .!,.!, ,5, ,3, .5, ,2!., !,.!,, 25, 
,2!,.2!,.2!,.3,,25,,5,.25,,2!,,5,.5,1 
9290 RETURR 

9330 FOR n*l TO lOt BEEP .0!,ns NEIT n 
9!0I IRK 4; PRIRT AT .,r!V-ii'.', INi; li 



BUT DOK’I"” RORRT THERE ARE RORE PIHE 
APLES,' 

8515 PRINT : PRINT ' IN ROOK 2 YOU RILL 
SEE A BLUE ' CROSS. THIS IS TO KILL T 
HE VAHPIRE IlF HE COHESI IN"" ROO 
H 3. YOU KA9E A CHOICE TARE THE CRO 
SS AND RISK A ■ 8IS8ER APPLE BUILD UP 
AND* THE CHANCE OF THE BEETLE H 
AUINS ANOTHER 60 AT YOU OR DON’T TA 
KE IT AND RISK BETTINB KILLED BY TH 
E • VAHPIRE AS HE DOES NOT ALNAYS"" 
APPEAR, TO SET THE CROSS JUST 80 TO 
!I'"‘ AND NNEN YOU'RE 8Y ITS NALf’’’ 
INLINE YOUR HEAD TO IT tj.MB.j" ’• BU 
T DO 

N T HIT THE RALLI"’" YOU ARE PROTECTED 
BY IT THEN'"' AUTONATICALLY. OTHERNISE 
HE ■■■' NILL TAKE A L1FE!1'”‘ IF THE V 
AHPIRE DOES APPEAR HE'" RILL NEVER CON 
E A6A1N." " HE ONLY APPEARS IN RODR 3* 
8319 PRINT ; PRINT ’ THE EVER 6R0IINE BL 
UE NALLS STOP APPLES 8R0NINE IN THO 
S£' "■ ILLEGAL PLACES. YOU CAN SO'"' TH 
R0U8H THEN THOUGH. HOPE ARE"" IN THE L 
ATER ROOM. "" YOU ROVE A BIT SlONEfi I 
N EACH'”' ROOR' " RORE ItfPLES NILL COR 
E IN EACH " " ROON AND A SONUS OF 1001! 

MpRESS A KEY»»* 

9320 PAUSE 0; RETURN 
9010 FOR 1*0 TO 16? 

9020 READ « 

9030 POKE USfi ’j'M.Y 
9035 NEIT 1 

9050 DATA 1,1,3,3,7,5,3,31 
9060 DATA 128,126.192, 192, 22A, 160,160, 24 
8 

9070 DATA 93,223,93,13,7,3,14,31 

9080 DATA 230,231,230,240,224,192,240,12 

0 

9090 DATA 24,16,36,126,255,253,126,60 
9100 DATA 24,124,253,233,127,126,62,28 
9110 DATA 56.60,126,255,235,254,120,56 
9120 DATA 24,60,126,153,255,102,102,36 
9130 DATA 192.240,235,254,235,254,248,0 
9140 DATA 24,24,253,255,24,24,21,24 
9150 DATA 24,24,60,102,195,102,126,60 
9153 DATA 14,30,51,243,255,62,30,12 

9157 DATA 124,255,191,3,3,190,232,128 

9158 DATA 0,224.224.224,224,224,96,0 
9139 DATA 24,219,189,124,124,126,219,152 

9160 DATA 60,90.90,60,24,0,0,0 

9161 DATA 0,0,0,82,32,24,108,90 

9162 OATA 173,231,86,237,183,106,84,60 

9163 DATA 248,248,248,240,224,192,120,2 
48 

9164 DATA 31,31,31,15,7.3,30,31 
9166 DATA 3,15,253.127,255,127,31,0 



PRINT AT 

9502 INK 6s PRINT AT 20,20s'i. s' 

9503 FDR n=2l TO 23 

9506 IF 1*19 AND y*B-l THEN LET »car»»i 
coraHOOs INK Is PRINT AT ll,26i'B0NUS * 
I PRINT AT 12,24|' 100 'i SEEP 1,5: BE 
EP .3, 10s DEEP ,5, 20s BEEP ,5,30s PAUSE 
SOi CIS I PAUSE SOs CLS i 80 TO 3SOO 
9510 IF ««20 AND y«n THEN LET tcsrMico 
riMOOs INK 1; PRINT AT ll,26{-80NUS 's 
PRINT AT 12,26(' lOO's BEEP ,2!,0i BEEP 
,23,2s SEEP .2S,4s CLS s PAUSE SOi 8D TO 
3500 

9520 NEIT n 
9527 RETURN 
9335 INK 3 
9539 CLS 

9541 PRINT AT 2,15(’Pi& 

CD* 

9550 IRK 2 
9360 PAPER 7 
9570 BORDER 1 
9580 PRINT AT 0,1 

9610 INK 3s PRINT AT 10,8i’YOUR SCORE ’j 
9620 INK l! FOR r»9 TD 21s PRINT AT 18,2 
9625 PRINT AT 18, l30-fl)|' 'j'l BEEP .25, 



9627 REIT n 

9640 B^P ,5, Os BEEP .23,0: BEEP .S,!i B 
EEP ,5,5s BEEP .5,7; BEEP .5,7s BEEP 1,1 
2; BEEP ,25,9: BEEP 1,5s BEEP ,5,9s BEEP 
.25,5i BEEP .5.2; BEEP l,IOi BEEP .5,7s 
BEEP .25,9s BEEP 2,5 
9650 60 TO 6000 

9910 If c»ll>.l THEN KEP .5,-10i 60 TO 
499 

9915 IF .*19 THEN BEEP ,5, -10s 80 TD 49 
9 

9920 FOR ti*l TO 24 

9930 INK 2i PRINT AT x+2,22-fii' ■; [KK 
3; PRINT AT «»2.25-H|'i-i's INK 4; PRIH 
T AT 

l♦2.24-n|■ rj's PRINT AT «*2,25-tSi' ' 
9950 BEEP (E(itl/12),Bln)s MIT n 
9960 IRK 2s PRINT AT |42,Ci‘i:^ PRIN 
T AT X42,24i'f" 

9965 LET cill»CilIfl 

9966 FLASH Is PRINT AT 5,261'DALLED'i FL 
ASK 0 

9970 SO TO 499 

99B0 INK h PRINT AT l.yi'iV; INK 0: P 
RINT AT 2,yi'F INK 3: PRINT AT «,yi'. 

INK Is PRINT AT «+l,yi'..: ■ 

9981 BEEP .80,10 

9982 IF INKETM'H' THEN UK 2; PRINT AT 
«*2,y,-'o's INK 4: PRIN! AT «-l,y;'K' 
s L 

ET osit*I 

9983 BEEP .25,10: PRINT RT l.yj' ■; mu 
T AT 2,yi' ' 

9984 FOR n»3 TO . 

9985 IF rs«l«-3) AND out»l THEN 80 TO 99 
91 

9986 INK Is PRINT AT n.yi' 's PRINT AT ss 
M.yi’.j': IKK Os PRINT AT is'P.yj':-' 

998B NEIT n 

9989 BEEP l,-3i BEEP ,5,-li BEEP 1,0s BE 
EP .5, -Is DEEP l,-3s 60 TO 4000 
9992 INK 2s PRIRT AT «-4,y)'...'i PRUT 
AT «-3,yi‘r's PRINT AT x-l,y;'i-.'s ink 
4: P 

RINT AT 1-2, Yi' Ill's LET Mflr»=tcorM50: 
BEEP ,5|7i BEEP .25,7: BEEP .25,7: BEEP 

5,7s BEEP .5,51 BEEP ,5,7 

9994 LH goiUT IRKDMA*!); PRINT AT «-l 

,Ti' ■: PRINT AT «-2,y;' PRUT AT «-3 

,y|' '1 PRUT AT »-4,y;' LET oufOi R 

ETURN 
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by David Muir 

A few years a^o there was a craze 
about fiddling with Hawaii multi 
coloured cubes, you may have 
thankfully forgotten the escapade 
— tout not Computer Gamer. 

In an opulent fit of nostalgia, 
Computer Gamer presents the 
computer simulation of this 
hideous torture. 

The Cube 

TtalB la & eompular glnii.ilatlon of lihe &mous cube 
pinalB.OTiflcubelamadeiipQfSV Bmaller ou2ib& The 
aim of the puzzle la to CHlat the small cubee amunC, 9 
at a time, to and up irtth each face of the lar^ cube 

oolourea {completely) a atflerenl oo' 




the computer to solve It or tty yourself 

If you try ycrmselt the oo7i©uter will Bllow jouup 

to 160 turns. The eoit — ' 




Ih different ways 
alemenle ofthscube are to be printed Ihi 
matctiee this to the colours to be used 
The array reo( ) keeps a record of the 




19 ' THE CUBE 

20 'DAVID nutR 
10 ItBi 

40 SOTD BOO 

50 IS61OH n 6QSUB 530,530,530,570,570,57 
0,010, 610,010, 060, 660,0(0,700,700, 700, 74 
0,740,740: RETUBN 

60 SOUHD 7,400, 10|3;IWIiB IIK£VI»”i«ND 
iRETUItN 

70 ql^'MIHlLE IWlEYlO'MIENtliSOUND 7,4 
00|10,3ilWlLE »J«”:q6*URPER»(lNi;EYJli»E 
HDlRETlMH 

BO qJ.-HHILE INSEY«(>":l(£W)iS0UH0 7,4 
0,l0,3!ll)liLE qt:“:qtaINKE*fil*E)ID!RETuRN 

00 ' ♦»♦** SET IIP «IM 
100 DEPIKT i-iiDEFSTR q 

110 509E OlBORDER 26iIM 0,26: INK 7,0iPA 
PER OiPEN hlRi; l,li]HK 2,24iIIO! 3,7i(Ni; 
4,0: UK 5,lSlINK 6,21iaSillIN0aMl,l,2O 
,2O,25iPAPERtl,0iPERtl,7!CLSIl 
120 SVRBDL 255,24,60,126,255,255,126,60, 
24:SVRBQL 254, 0, 0,32,45,56, 60,00, OOiSYNB 

01 253,60,60,60,60,28, 12, 4, OiSYHBDL 252, 
0,0,4,l2,28,60,60,60:SYnBOL 251,60,60,60 
,60,56,46,32,0 

130 DU <«l5,2,2),pll3,2,2,2),ricllS0l,h 
ll<2l 

140 FOR 1*0 TO 5lfOR )0 TO 2iFDR k=0 TO 
2i4lU,j,k)<UhKEniNEniNEn 
150 RESTORE 370iFOR leO TO SiFDR ]>0 TO 
2lF0R k*0 TO 2:F0R 1>0 TO liREAD plll.j, 
k.lliREITiMEITiNEnillEU 
160 TASiFOR 1*0 TO SiFOR ]>0 TO 2iF0R k< 
0 TO 21PLOT 0,400, fill, j.kIsFDR UO TO I 
IMOVE ptli,),k,0),pl(i,i,k,l)iPRUT CHRK 
I255+(1*1 OR i»4H3»(i=2 OR i»5))|!R(lVE 
pl(i,),k,0l,plll,J,t,l)'l6 
no IF l«l OR iM THEN PRINT CHR(l2S3l;i 
ELSE IF iv2 OR i>5 THEN PRUT CHRtnSlIi 
160 NEITiNElTiNElTiNEITiTAEOFFiLOCATE 12 
,liPRINT '(BACK)' 

190 TA61PLDT 0,0,7iFOR )*0 TO 0:FflR i»0 

TO liREAO >,>:P0 VE i.yiPRUT CHRtl65»j-3 

2*(iain(:NEITiHElTiTRS0Fr 

200 ' MM* SET UP OPTIONS m 4 m 

210 0»="i»«0;C1.5lllPRlNT»l, 'PLAYER SET 
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UP IP)'iPRIIIItl,'DR COWUTER (Cl 7' 

220 60SUB 70: IF qJi'P* TH£R 3W ELSE If 

q»0'C‘ THEN 220 

2J0 ' •*•»» CBNPUTEfi SET UP 

249 CLSiliPRINTII, 'ENTER NO, THISTS'iRR! 
H7»i,'(l-!DI'!lNPUttl,qliIf q»."THEN 24 
0 ELSE IF LENIqt)>2 THEN 240iELSE kOtPO 
R l»l TO LEHlq4l!k*k»IHlM(ql,l,m'S'0R 

NIDKq»,i,l)CO*)!N£ITiIf LOO THEN 240 
ELSE coVALlqtlslF C>0 OR c>SO THEN 240 

250 FOR N»1 TO C!CLSIl:ff*I»t(RNII«91H5* 
32»!HT(RND«2lin*f4-64*23»Hf>7Jltr*t(Fl» 
♦ f-32«(f4<74l»32mF>?3!iTftS0FF:PRlHTIl, 
hi’ CsCHRKHlj'l'iiTASilMM 

260 eOSUB SO 

270 OOSUB OOiTABOFFiNEIT 

2B0 • mu SOLVE OPTIONS hh» 

290 aSiliPRINTBl.'CHIPUTEI SOLVE ICI'iP 
RlNIll.'OR PLfiVER (Pi 7' 

300 BflSUB 70s IF qJ.'P' THEN 420 ELSE IF 

qlO'C THEN 300 

310 ' HMi CONPUTEfi SOLVE «»t« 



420 pF-lli«*FlELSIliLDC«TE 1,17:PRINT'(0 
I OUITilR) RESET' 

430 IF M50 THEN CLSBllPRINTII.'LIHIT R 
EACHEO'iOOSUB 70>IF qt^'O’ THEN CLSiEND: 
ELSE LOCATE 1.I7|PRINT SPAtEKlSliCLSOI: 
SOTO 320 

440 BOSUB SOllF UPF£Rt(qt)>‘l)THEN CLSiE 
ND:ELSE IF UPPERt(qt)>'R'THEN LOCATE 1,1 
7IPR1NT 5 PACEI(IBI:CLS(IeS 0TD 320iELSE I 
F qlCA' OR qJ>'i' THEN 440 ELSE IF q4l' 
1’ THEN IF q»<*j' THEN 440 
450 n*ASCIq»l-64*23tlqt>'l')iftcHI>AS:( 
(ll)«32i(q4>*i')-32»(ql<-i'tiTAS0FF!CL5ll 
iPRlNTll.f*!)' Ciqli'l'fiSQSUB SOsTASOF 
F 

460 FMtIiSOSUB 490iIF NOT c< THEN 430 E 
LSE c(>0:CLStllPR|NTI),'C0N8RATULAT10NS' 
•:F0R 1«1SC TO 30 STEP -20i50UND 7,1,50, 
7iF0R J<I TO SOiNElTiNEir!f>0:60SUS 70 
470 CLSiliPRINTII, 'ANOTHER SO (V/NI 7';5 
OSUB 70iIF qd'T* THEN OLSIillOCATE 1,17 
iTASOPFiPRINT SPACEIUSliSOTO 2IOlELSE I 



l,fl-4l>(6(l,i,n-4lifill,l,n-4l»IiI3,n-4, 
2'ilifi(3,n-4,2-il»Fj(5,2-i,6-nl:Ii(5,2- 
i,6-m>ho(i)iNEITiF0R i»0 TO 2;PL0T 0,40 
0,fil0,l,n-4) 

5B0 HOVE pi (0,1,6-4,01 , pi 10,1, n-4,lhPRI 
NT CHfltl2SSIiiPL0T 0,400, Fid, i,n-4l:N0V 
E plIl,i,n-4,01,pm,l,n-4,l)iPRlNT CHRI 
(2541(iN0VE pin,i,n-4,0l,pl(!,i,fi-4,l)- 
I 61 PRINT CHR>l2S3liiPlDT 0,400,4t<3,fl-4, 
2 - 1 I 

590 ROVE pU3,li-4,2-i,0>,pI(3,n-4,2-i.ll 

iPRINI CHRI125SI;iPLQT 0,400,Fil5,2-l ,6- 

iiliHDVE pl(S,2-l,6-n,0),pI(5,2-i,6-n,lli 

PRINT CHRtl2S2);il1DVE p) IS,2'i,6-n,0),pl 

15,2-1 ,6-n,ll-14iPRINT CHRIl2511i 

600 NElIiREIURNi REN SEP 

610 FDR 1*0 TO 2iNalll>4i(l,n-7,i)i<i(I, 

fi-7,it"<a(2,n-7,il!«i(2,n-7,il*(*(5,n-7, 

iliFi(5,n-7,jl»f»14,f.-7,ll!4a(4,n-7,il*fi 

UllliNEITiFOR 1*0 TO 2iPL0T 0,400, Fill, n 

-7,1) 

620 NOVE pill, (1-7,1, 01, pin, n-7,i,ltiPRl 






320 IF p( THEN PRlNTIl,'RESETIIN5'iTABiF 
OR »M -1 TO • STEP -liB«r»clel-64*23»(rt 
C<t))73)l60SUB SOiNEn!TASl)FF!F>>ipFOiC 
IStliPRINTIi.'START'iSOSUB 60:60TD 290 
330 FOR iM-l TO 0 STEP -liCLSIllPRINTIl 
,•♦ 1 ;' (■iCHRl(f«(»li;')*[;nsrecl«l-64+ 
23Mric(il>73):BDSUB 6 O:E 0 SUB SO 
340 TAEOFFiNEJTiPRlNIIliPRlNTIliPRlNIH, 
■PRESS KEr:PfiINT41,'T0 RESIART'iiMSLIB 
OOiSOTD 210 

350 'HtH PLAVER SET UP i«<>» 

360 CLSIliLDCATE I,l7iPRINT'(Sl TO SOLVE 

370 IF F«50 THEN CLSiliPRINTII, 'SET UP L 
IRIT'iPRlNTll.'NON SOLVE’iBOSUB 6 O 1 LOCAT 
E l.lTiPRINT SPACE4112II60T0 290 
3B0 BOSUB BOlIF UPP£R4(qtl*'S' THEN LDCA 
TE l,l7iRRINT SPRCE4(l2ii60TD 290 iELSE I 
P ((ICR' OR ql>'i' THEN 580 ELSE IF gl>' 
1' THEN IP qK'i' THEN 380 
390 n*ASC(qll-6l*234(q»>'i'liric(F)»A5C( 
qll+:2i(q»>'I')-32*(q4<'4')iTA60FF:CLSIl 
lPRINTIl,F«li* ('iqJiVjiBOSUB 50i 
400 q4»"it*F+liTAMFFi60TO 370 
410 ' »«H« PLAYER SOLVE •»<>! 



F qPO'N' THEN 470 ELSE CLSiENO 
480 ' tttii FINISHED CHECK «M«« 

490 cF»-l:FIIR i»0 TO 3lP0R j*0 IQ OiFOR 
k»0 TO 2 

500 IF {j|i,J,klOF6li,0,DI THEN cF>0 

510 NElTiNEITiNElTiRETURN 

520 ' MH* SINSLE TNISIS 

530 FOR i*0 TO 2ih6UI>Fi(0,n-l,il:(|(0, 

n-l,il*F6(2,l,3-nllF6l2,l,5-fl)Mi(3,2-i, 

n-l)iF»(3,2-i,n-n*Fj(4,2-i,n-l)tFj(4,2- 

i,B-ll«NoIil!NElT;FOR i»0 TO 2sPLQT 0,40 

0,F6(O,B-|,il 

540 NOVE pllO,B-l,i,Ol,pllC,B-l,i,ll:PRI 
NT CHR4(255);iPL0T 0,IOO,Fi(2,t,3-nliROV 
E pl(2,i.3-n,OI,pl(2,i.3-n,lllPRlNT CHRi 
I252)||R0VE Pil2,i,3-r,0l,pll2,l,3-n,n- 
16:PRINI CHRIl231)riPL0T 0,400,fi(3,2-i, 
iHl 

550 NOVE pl(3.2-i,B-l,OI,pl(!,2-l,ii-l,ll 
iPfilNT CHR»(255liiPLDT 0,400, fill, 2-i,B- 
lllKQVE plI4,2-i,B-l,0),pl<4,2-i,B-|,ll: 
PRINT CHRI(254)|iR0VE pl(4,2-i,B-l,0),pl 
I4,2-i,B-l,l)-16:PRINT CHfi»;253l! 

560 NEITiRETORNi REN ABC 

570 POR (>0 TO 2iho(ilMil0,i,n-4):F(<0, 



NT CHRt(2541i:HDVE pill, Pi-7, 1,0), pl(l,n- 

7.1.1) -l6iPfiINT CHR»(2531iiPL0T 0,400,F* 
I2 ,b-7,i)iN 0VE pl(2,n-7,l,01,pl(2,ri-7,i, 
DiPRINT CKRfl252i| 

630 NOVE pU2,n-7,i,OI,pl(2,B-7,i,l)-l6i 
PRINT CHBI(251 )!iPL 0I 0,400,Fi(5,n-7,il: 
HOVE pl(5,B-7,i,0l,p!l5.n-7,i,ll:PRlNT C 
HR4(252l[illOVE pll3,n-7,i,0).pl(5,n'7,i, 
n-16sPRINT CHRI(2Sll|:PLar 0,400, Fill , b 
-7,1) 

640 ROVE pl(4,B-7,i,0),pl[4,n-7,i,ll:PR! 
NT D(R»I254||!R0VE pl(4,B-7,i,OI ,pl (4,pi- 

7.1.1) -U:PRlNT CHRI(253)i 
650 NEUiRETURNi REN 6H[ 

660 FOR i>0 TO 2)holil>Fal0,B-10,i):Fil0 
,(1-10,1 l*fi(4|2-i,n-10)!Fil4.2-i,n-101»( 
6l3,2-i,B-101i(il3,2-i,B-10)*Fi(2,i|12-ri 
):fi(2,l,i2-al>ha(jliNElIiF0R i*0 TO 2:P 
LOT 0,40D,Fi(0,n-10,il 
670 ROVE pllO,n-lO,i,O),pKO,ri-10,i,l)iP 
PINT CHRtl2S5l!iPL0T 0,400, Fill, 2-i,n-I0 
) I NOVE pi (4,2-1,0-10,01, pi (4, 2-1,(1-10,11 
SPRINT CHRi(254)i:mVE pi l4,2-i,n-10,0), 
pll4,2-i,B-IO,ll-16iPRlNT CHRK2S3)) 

680 PLOT 0,400,Fil3,2-i,B-IO)iHOVE pi 13, 






}-i,n-10|OI,|ill3|2*i,n*l(l,l)i?ltlin CHRt( 
2SSI||RL(1T 0,4M,fi(2,l,12-nl:RQVE pH2, 
i,I2-n,4l,»II2,i,12-n,llil>RINT CHRf(2S2l 
liltOVE pll2,i,I2-n,0),pH2,i,12-ft,II-tii 
PflUr EHRil2Sl)) 
m HEITsREmNi REfl ibc 
790 fOR i*0 TO 2ihglil*Ti(l,i,n-I3):TiU 
,i,n-U)*(i(0,i,n>13):(i(0,l,n-lSl<Ti(S, 
2-1, lS*i>)Mi(3,2-i,IS*ni*Ti(!,n-lS, 2-1)1 
(b<3,n-13,Z-i)>holi)lNEiriFQR 1*0 TO 2:R 
1.0T 0,400, Till, l,n-13) 

710 KDVE Ria,l,n-13,OI,pin,i,n-l],lllP 
RUT 0lMtl254l)iUVE pi Il,i,n-i3,01,pia 
,i,R-lS,ll-14sRRUT CHR1I2S3I):?LDT 0,40 

0, Ti(0,i,n-l!)!K0VE pKO,t,n-lS,0),pl 10, 

1, n-13,IliPRUT CHRtl2SS)|iPlOT 0,400,fl 
(5,2'1,15-Pi> 

720 ROVE pl(!,2-i,lS-n,01,pll5,2-i,l5-n, 
lllPRINT CHRf(232)|iN0VE p!(5,2-l,IS-n,0 
l,pllS,2-i,lS-n,n-UiPRUI CHRiiZSDilP 
LOT 0,400, lil3,n-13,2-i)iR0V£ pll3,n-13, 
2-1,0) ,pl 13,11-13,2-1 , 1 1 iPRINT CHRt (253) | 



?'l 

810 EOSUB 70itE THEN 100 ELSE IF 
qOO’V’ THEN SlOiELSE KDOE liCLSiPRlNT * 
USTROtnOKS'iPRUT 

920 PRINT ■ Thli ii I stiuUUpfl e< U( 
(iisut c(ikipui:li.<au * vim of INrt 
I ficil inOi Vila of till hiddtn thru fi 
cti li iianfroi bthlnd, 

930 PRUTiPRUT ‘ You or the coiputir u 
t the puzzle aithup Co 30 taieti'. The 
n till CDipulir oryou eolvi it in up to 1 
00 taiiti. If youget itucl or fail, the c 
oiputir alll tikiyou back to the itart 
for another go ortolve it for you, 

B40 PRINTiPRUT -Taiita are intared at 1 
ettere - nail toturn one aay and large 
to turn the other 

850 PRINTiPRINTiPfiUTiPfllHTiPRINT 'PRESS 
RHY KEY'iBQSUB 70:SDTD 100 
800 ' MH« NTR PRINT POSITIONS tiitt 
970 ORTA 200,300, 232, 314, 264,329,148, 344 
,200,328,232,312,136,328,168,312,200,296 



AMSTRAB 



,120,310,132,292,184,276,120,279,152,262 

,184, 246, 120, 246, 132, 230, 194, 21*, 216, 278 

,249,294,280,310,216,246,2*8,262,280,278 

,216,214,248,230,290,246 

890 DATA 432,264,464,249,496,232,400,248 

,432,232,464,216,368,232,400,216,432,200 

,448,366,460,348,512,334,449,334,480,318 

,512,302,448,302,480,286,512,268,332,334 

,394,350,416,366,352,302,384,318,416,334 

,352,270,384,286,416,302 

890 DATA 168,376,284,206,136,360,252,190 

,104,3*4,220, 174, 232, 376,124, 206, 26*, 360 

,156,190,296,344,189,174,98,306,312,306, 

89,274,312,274,88,241,312,241 
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BRITAIN’S MOST ADVANCED COMPUTER MODERATED PLAV 6V MAIL CAME. AN EXCITING NEW CAME 




Send to KJC Carnes. POBox 1T, 
cieveieys, Blackpool, 
Lancashire PY5 2UL 
welcome on - I02SSI seeSAS 



■ the ruletiooK, setup and first r 
Each cum of Capttol costs Ct 75 
itSOorOers Each additional SO 
co«s75p Europeanplayersan 






GAMES 



Capitol features- ■' 

•A strategic space warfare game, completely compute 
nwOerated. . . , * » 

• ApproximatelYSSplaverspergame. * •. 
epiayers design their own race’s charactertstlcs and • •" 
description. * 

e construct bases on your planets for protection and 



•C^gn your own starships and build them at your star 

•ExpandyouremplreandconQiieretherraces . 

a An 'advanced stage’ of the game introduces new 

technologlesofstargatesandimprovedshlpmovement 
. capabilities ^ 

•capitol'ssimpllfiedorderformatsareeasy to . * ' ' ^ 

remember.NocodlngyourorOersontocomputercards 

orotherglmmlcks • ». ■ - 

— ecapitol has an easy to understand rulefaook, complete 
with numerous examples. 

. eCapltcHwassubiectedtothelargestplaytestofANy 

» ■ f • , commefclalPBMgame.OvendOplayersplavedover 

* * ISOOturnsofCapltolprlorfarelease. 

"Capitol Is fastbecoming the Standard against 
other space warfare games are compared” 

• with each ruleboox you receive a sec of overli 
^ ' In mapping the game and moving ships. 



Most other computer 
one turn every two « 



Readers in North AmerKa should write to Adventur 
Mall, PO BOX 456. Cohoes, NV12047, for informatlonf 
capital. 



KXCameshasbeenrunnlngPlayByMallgamesfor ‘ *. 
about five years now and our reputation for giving good, 
exciting games and a first class service is second to none 
-Our team of professional Camesmasters will usually re^y 




SPECTRUM 






1 R£N H XUER - D.ainN H 

2 DIN M(41j LIT Mll)«*7'i LEI MI21 
LET H(3l*'5‘l LET »I4)*’8‘ 

Z 6D TO tlDO 

4 6D TO TKOl BORDEI) St PWER 4i CLS 

5 MROER Si PAPER Si CIS i DIN AllS)i 
DIN CI16I 

t IF LEVEL<1 THEN INSTORE 20 

7 IP LEVEl>2 THEN RESTORE SO 

8 IF LEVEL<S THEN RESTORE 40 
4 IF IEVEL>4 THEN RESTORE 40 

11 FDR 1*1 TO 14 

12 READ Adi, cm 



13 NEIT I 

20 DATA 170,170, ISO, 171, 182, 172, 171, 17 
3,178,174,172,173,181,174,173,177,175,17 
8,177,179,174,180,183,181,183,182,184,10 
3,179,184,174,183 

30 DATA 184,184,194,187,198,188,187,18 

9.194.190.188.191.197.192.189.193.191.19 

4.193.195.190.194.199.197.201.198.200.19 
9,195,200,192,201 

40 SATA 202,202,212,203,214,204,203,20 

5.210.204.204.207.213.208.205.209.207.21 
0,209,211,204,212,215,213,217,214,214,21 
5,211,214,208,217 

40 DATA 218,218,228,219,230,220,219,22 

1.224.222.220.223.229.224.221.225.223.22 

4.225.227.222.228.231.229.233.230.232.23 
1,227,232,224,233 

100 REN 

101 PRINT AT 0,0) INK 3| 8RI8HT 1; PAPE 
R 41'PLEASE HAIT,.' 

102 LET 8<li LET 8>l2l LET D>-4i FOR >• 
cm TO C(4I 

103 POKE 23474,11 LET 8>8i4 

104 PRINT AT 3 , 8 ) PAPER 4i’rbcd‘| 
AT 4,8i*EFGH*)AT 7,l|' I jh t_'|A 
T 8,8i‘MNQP' 

103 POKE 23474, AISli LET S*DHi LET S>S 
M 

104 PRINT AT 5,D| PAPER 4i‘RBCD') 
AT A.Bj’EFGH'iAT 7,Di' lUh l '(A 
7 8,DiTiMOP' 

lOT NEIT 1 

108 LET 8>12i LET 0<-4t FOR I>CIS) TO C 

(81 

109 POKE 23474,11 LET 8>8«4 

no PRINT AT 9,8i PAPER 4(*PBCr*t 
A! I0,8i'EFil.M*|AT 11, 8|' r.Jt !_■ 
|AT 12,l|V-irgop' 

111 POKE 23474, AlSli LET 0>O«4i LET S«S 

112 PRINT AT 9,0) PAPER Aj'PBC t'*) 
AT 10,D)’eFGH*|AT 11,D|' i...in,u’ 
)AT 12,t|‘MiJOP' 

113 NEIT I 

114 LET 8<12i LET S>-4| FOR I>CI9l TO C 
(121 

115 POKE 23474, It LET B>8«4 

114 PRINT AT 13,B| PAPER 4|‘PBCD' 
(AT 14,8)'EFGM'|AT 15,8|‘ 

•|AI l4,8|'ttf-JOP* 



117 POKE 23474, A(8)i LET 0*0Mi LET S»S 

118 PRINT AT 13,0) PAPER 4)'PBCt>' 
|AT 14|D)*EFGH')AT 13,0)* x JKU. 
•|AT 14,S)’HNOP' 

119 NEIT I 

120 LET B*12i LET OMi FOR IC(t3) TO 
C(I4I 

121 POKE 23474,11 LET B>B<4 

122 PRINT AT 17,8) PAPER 4)'P6CD' 
)AT I8,B)‘eFGH')AT 19,8)* lUH L. 
•)AT 20,B)*MMOP* 

123 PUKE 23474, AISIl LET S>0«4i LET 8>S 
♦ I 

124 PRINT AT 17, D| PAPER 4)'pbcd* 
)AT 10,S!*EFGH*|AT 19,0)* I^tKL. 
•)AT 20,D)*MNOF* 

125 NEIT t 

124 PRINT AT 4,0) PAPER 4) INK S| 8RI6H 
T ir *)A 

T 21,0) INK 8)' 

127 PRINT AT 0,0) PAPER 5) INK 0) BRISK 
T 1)*TAR8ET • •jTARSET)*.* 

128 LET NQVES'O 

129 FDR N'O TO 20l BEEF .02,Ni NEIT N 

130 PRINT AT 2,0) PAPER 5) INK 0) BRISK 
T li’NOVES • ’fNOVES)*.* 

131 LET I»li LET T»1 

133 FDR N>1 TO 20l SEEP ,02,Nl NEIT Ni 
LET AUliO: LET Clll'O 

134 PRINT AT 5,0) PAPER 4|* ‘jAT 4,0 
)■ *|AT 7|0j* ’lATBiO)* ■ 

135 PRINT AT 21,0) in: 8) PAPER 4| 8RI6 

HI 1|’ • 

140 DIR At(4,4l 

141 LET Al(ll**r— I'l 
LET AII2)i‘| 1*1 

LET AA(3) 

•*l ri LET At(4l>’k 

144 PRINT AT 5,0) PAPER 4|AI(II)AT 4,0| 
At(2l)AT 7,0)A9I3)|AT B,0)ADI4) 




COltPUTEH OAKER JUTTB 1966 





150 LET lt*inEVI 

151 IF li>" THEN 60 TO IT2 

152 IF it>K(UI DNO T« THEN 60 TO 200 

153 IF lt>Ktl2i AND Y>1 THEN 60 TO 210 

ISA IP AND 1>1 THEN 60 TO 220 

155 IF AND I<4 THEN 60 TO 250 

154 IF U.‘A' THEN 60 TO 3000 

157 IF ]<>’0' AND T'l THEN 60 TO 3200 

156 IF I1>'0' AND T*2 THEN 60 TO 3250 

ISO IF AND V>3 THEN 60 TO 3240 

140 IF I}>'fl' AND T>4 THEN 60 TO 3270 

141 REN 

142 IF It>'P’ AND T*1 THEN 6D TO 3500 

143 IF II-'P- AND y*2 THEN 60 TO 3550 

144 IF U**P' AND »*3 THEN 60 TO 3540 

145 IF II*‘P' AND T«4 THEN SO TO 3570 

m REH 

161 FAINT AT 2,0; IW Og PAFEA 4) BRISK 
T 1;'N0V£S . ')H0VE6;'.* 

165 RER 

164 FOR R*1 TO 14 

167 IF AIRIOCIR) THEN 80 TO 166 

166 NEIT «i 60 TO 2000 
196 60 TO 150 

200 RER t* HOVE DONN ti 

201 60 SUB lOOOi LET A(DI>RIN)t LET AIN 
)*0 

202 PONE 23474, AlO) 

203 LET PAP*4: LET PiYttil: LET Pl«l*4- 
4i LET E-lY*4)-4*li IF AIEI'CIEI THEN L 
ET PAF>4 

204 PRINT AT P,Pl; PAPER PAP|* p-TE CC' 
’lAT PM,PI|*eFiiH‘;AT P*2,P1|' IJ 
H l_’|AT R*3,P1 

I't-lNOP* 

205 PRINT AT Pt4,Rl; PAPER 4tMU)|AT P 
*5,P1|AI(2I|AT P*4,P1|A<(3I)AT Pf7,PI;At 

141 

204 LET Y*YH 

207 LET N0VES«N0VE6Mi 60 TO 160 

210 REN tt UP II 

211 60 8118 1020; LET A(DI<AINIl LET AIN 

212 LH PAP*4i LET P»Yi4ili LET PIMM- 
4i LET E*iri4)-4Mi IF AIEKIE) THEN L 
ET PAP»4 

213 POKE 23474, AID) 

214 PRINT AT P.Pl; PAPER PAR|'rbcD 
■|AT Pil.Pli'EFC-^H'iAt P*2,Pli’ X.J 
K l_’|AT P*3,P1 

I'riNOP’ 

215 PRINT AT P-4, PI; PAPER 4;AtUI;AT P 
•3,PI;Atl2);AT P-2,P1|AI<3I;AT P-1,PI|A< 

(4) 

214 LET Y'Y-1 

217 LET H0VE8*H0VE8M! 60 TO 160 

220 RER II LEFT M 

221 SO 8U6 10411 LET A(0)*AIN)| LET AIN 

222 LIT PAPMl LET P«Yi4Hl LET P1MI4- 
4i LET EMYMM+li IF AtllOlEl THEN L 
ET PAFM 

223 POKE 23474, AlO) 

224 PRINT AT P,P1-4| PAPER 4|AltI);AT P 



♦l,Pt-4|AH2l;AT Pi2,Pl-4;A»I3l|AT P*3,P 
l-4;Ail4) 

225 PRINT AT P,P1; PAPER PAP|'RBCD 
•;AT PH,P1;'EFC-H';AT P*2,P1|’ I-J 
K 1_‘|AT Pi3,Pl 

224 LET JM-1 

227 LET HOVES'HDVESMl 60 TO 160 

250 RER II RI6HT ii 

251 60 sue 1100 

252 LET PAPMi LET AIOI'AINh LET AINI> 
Oi LET PMI4MI LET Pl>U4-4i LET E*IYl4 
l-4tli IF AIEIMIEI THEN LET PAPM 

253 POKE ?3474,A(0I 

254 PRINT AT P,PI; PAPER PAP;'PiecD 
■;AT PH,Pl|'EPaH';AT P*2,R1|* lo 
NL.’|AT P+3, PI 

*255 PRINT A! P,PU4; PAPER 4;AHl);AI P 
+1.P1»4;A»I2);AT P+2,Pl+4;AI(3l|AT P+3.P 
I+4|A4I4) 

254 LET I>l*l 

257 LET NOVESiNOVES+ll 60 TO 160 

1000 REN 

1001 IF 111 THEN 60 TO 1004 

1002 IP YM THD LET N>5> LET D*1 

1003 IF Y*2 THEN LET «*6i LET Oi5 

1004 IF Y*3 THEN LET N»I3l LEI 0*6 

1005 RETURN 

1004 IF I>2 THEN SO TO 1011 
1007 IF r*l THEN LET N*4l LET 0>2 

1006 IF Y>2 THEN LET N>iOt LET 0>4 
1006 IF Y>3 THEN LET N*14l LET 0«I0 

1010 RETURN 

1011 IF i>3 THEN 60 TO 1014 

1012 IF Y<l THEN LET N>7i LET DO 

1013 IF Y>2 THEN LET N>ll! LET D«7 

1014 IF VO THEN LET N*tSi LET D>ll 

1015 RETURN 

1014 IF Y>1 THEN LET H>ei LET 0>4 
1017 IF r>2 THEN LET N*12i LET HO 

1016 IF YO THEN LET N>14i LET 0>I2 
1016 RETURN 

1020 REN II UP II 

1021 IF 111 TH» 60 TO 1027 

1022 IF YO THEN LET N>ll LET C*5 

1023 IF Y>3 THEN LET N*5: LET 0*6 

1024 IF Y*4 THEN LET N*6i LET D>13 

1025 RHURN 

1027 IF I>2 THEN 60 TO 1032 

1026 IF YO THEN LET N*2t LET 0>4 

1026 IF YO THEN LET N*4l LET 0*10 

1030 IF TM THEN LET N>10) LET 0>14 

1031 RETURN 

1032 IF 1>3 THEN 60 TO 1037 

1033 IF Y*2 THEN LET N<3i LET 0>7 

1034 IF YO THEN LET N>7l LET 0>1I 

1035 IF YM TtSN LET H>lli LET 0*15 
1034 RnURN 

1037 IF YO THEN LET NMi LET 0*6 

1036 IF Y>3 THEN LET N*6i LET 0<I2 

1036 IF YM THEN LET N*l2i LET 0'14 

1040 RETURN 

1041 REN II LEFT il 



I LET 0*4l LET NO 
I«S THEN LET 0*7i LET N>4 
4 THEN LET 0*6; LET N*7 



1042 IF t>l THEN 60 TO 1050 

1043 IF lO THEN LET OOi LET N< 

1044 IF 1*3 THEN LET 0>3l LET N' 

1045 IF 1*4 THEN LET 0*4i LET N< 

1044 RETURN 

1050 IF Y>2 THEN 60 TO 1040 

1051 IF l>2 TI 

1052 IF I< 

1053 IF I' 

1055 RETURN 
1060 IF Y>3 THQI 60 TO 1070 

1041 IF 1*2 THEN LET D*10i LET H>6 

1042 IF I' 

1043 IF I' 

1045 RETURN 

1070 IF l>2 THEN LET D*14i LET N*13 

1071 IF 1*3 THEN LET 0*15l LET N»14 

1072 IF IM THEN LET >14i LET N>15 

1075 RETURN 

1100 REN 

1101 IF Y>1 THEN SO TO 1110 

1102 IF I'l THEN LET 0*ll LET N>2 



UDS RETURN 

1110 IF r>2 THEN 60 TO 1120 

1111 IF 1*1 THEN LET 0*5i LET N*4 

1112 IF 1*2 THEN LET D*6i LET N>7 

1113 IF IM THEN LET 0*7i LET N>6 

1114 RETURN 

1120 IF Y>3 THEN 60 TO 1130 

1121 IF W THEN LET 0«6i LET N>10 

1122 IF 1*2 TiCN LET 0«l0l LET N*ll 

1123 IF 1*3 THEN LET D'lil LET N*I2 

1125 RETURN 

1130 IF IM THEN LET 0*l3i LET N»l4 

1131 IF 1' 

1132 IF I' 

1133 RETURN 

2000 REN 

2001 PRINT AT 21,4 INK 3; FLASH 1; 8RI8H 
T l;‘ HELL DONE.. 'l FOR N*l TO 20; DEEP 

.02,Nl NEIT Nt PAUSE 250 

2002 FOR N*0 TO 200i NEIT N 

2003 as I PRINT AT 1,0;*N1IER • BY O.SH 
ITH 1685..' 

2004 PRINT AT 4,0; 

2005 IF H00ES7TAR6ET THEN PRINT INK 3| 
FLASH I; BI16HT l;'Y0U HAVE COHPLETED T 

HIS LEVEL, tUT TOO NANY NOVES...' 

2004 IF N0l£S<rAR6ET THEN PRINT INK 3; 

PUSH 8; 8R16HT 1;‘HELL DONE KIT L 

EVEl...* 



2007 IF NOVES'TARSET THEN PRINT INK 2| 
FLASH l| IRISHT Ij'YQU HAVE JUST lUOE I 



2008 IF N0VES>TAR6ET THEN 60 TO 2100 
2006 IF H0V£S<*TAR6ET THEN 60 TO 2200 
2010 60 TO 2010 

2100 REN 

2101 PRINT AT 15,0;' DO YOU NISH TO TRY 
TO CONPLETETHIS PICTURE A6A1N NITH A HI 

6HERTARBET...’ 

2102 PRINT AT 16,0; INK 0; PAPER 4;'Y - 



COHFUTEa OAMER JUT7E 1986 



FM YE9.'"’)I • FOR ».■ 

2t<l3 F0K£ 23feSt,ei IF IWEFO’Y' THEII I 
ET TMeEI>T«R6Ert29i « TO S 

2104 IF IUETt>’tl' TMEK RUN 

2105 80 TO 2103 

2200 REN 

2201 PRINT ■" 

2202 IF LEVELM THEN PRINT ‘YOU HOVE CO 
IPLETED FOUR LEVELS.. .'i FOR I* 
1 TO 20i BEEP .02,11 NEIT Ii PROSE 200i 
RUN 

2203 LET LEVEL*LEVEL«I 

2204 60 SU8 2300 

2205 PRINT 'PICIORE CODE - ‘m FOR »■! T 

0 LEN 00> PRINT CHRt (CODE Dt(HJ«2lii NE 
IT N 

2207 PRINT ■ "•RNY NET.’ 

2206 PAUSE Oi RESTORE 20i SO TO 3 

2300 REN 

2301 IF LEVEL*2 THEN LET Oi>’BN?AC* 

2302 IF LEVEl*3 THEN LET Ofi'BDSTPCO' 

2303 IF LEVELM THEN LET 0t*‘B60DCPCLR‘ 
230S RETURN 

3000 REN 

3001 POKE 23074,255 

3002 RESTORE 3010 

3003 FOR I«UER 'A' TO USR 'C'«7i READ Ai 
POKE l,Ai NEIT I 

3010 DATA 120,120,120,120,120,120,120,12 
0,00,00,00,00,00,00,00,00,21,24,24,24,24 
,24,24,24 

3011 LET SP<! 

3020 FOR I>3 TO 20 

3040 PRINT AT I,0| INK 5) BRISHT l| 

3050 IF 5P*l THEN PRINT 

3000 IF SP>2 THEN PRINT 
BBeeBBBBB* 

3070 IF 8P«3 THEN PRINT ‘CCCCCC 
ccccccccc 

3071 IF SR*4 THEN PRINT ' 

3075 SEEP .05,1 

30B0 NEIT 1 

3000 LET SP'SPil 

3100 IF SP<5 THEN SO TO 3020 

3110'PRINT AT 21,2) INK 3) BRISHT 1) FLA 

9H 1) ‘PICTURE HAS SEEN ABANDONED.' 

3120 PAUSE lOi FOR >>l TO 20i BEEF .02,1 

1 NEIT I 

3130 PAUSE SO) RUN 

3200 REN «• NRAP AROUND H 

3201 LET PAP-Oi LET T«li LEI S«l: LET 0* 
Adli LET A111.AI21! LET A12I*A(31l LET 
A(3)*A(4li LET AI4l>Di LET M-h IF ><0 
THEN LET W 

3202 LET E>(VM)-4+Ii IF A(E)<C<EI THEN 
LEI PAP<4 

3210 LET P*li FOR N>S T S«3 

3215 LET FAP'Oi IF A(N)>C(KI TICN LEI P 

tf*4 

3221 IF A<N)>0 THEN PRINT AT TM4l,P«l- 
4| PAPER 4)A«ll)fAT T>4»2,?M-4|A<I2)|AT 



T»4+3,P»4-4iAB(3ijAT TM»4,Pi4-l)AH4l 
3222 IF AINJOO THEN POKE 23070,A(N)i P 
PINT AT Ti4d,P»4-4| PAPER PAPj'PBCC 
•)AT 

TM*2,P»4-4i‘EFiSH'iAT T»4*3,P»4-4 
)• I .JK 1_‘ j AI TM*l,P44-4i ■ r-l r J O F'* 
3220 LET P-PMl «IT N 
3230 LET H0VES>HaVES>ILEVEL45l 
3240 SO TO 100 

3250 LET T'2l LEI S*5i LET 0>A(S)i LH A 
(S)«A<0)| LET A(0)>AI7)i LEI AI7)>A<8lt 
LET A(6>*Sl LET l>Mi IF 1<0 THEN LET 
1*4 

3251 00 TD 3210 

3200 LET I>3| LET S>0: LET O'AlOli LET A 
IO)>A(IOIt LET AllOmuill LET Ami>Ai 
12)1 LET A(I2)>0| LEI l>l-li IF 1«0 THEN 

LET 1»4 

3201 SO TO 3210 

3270 LET T>4i LET $<13l LET D>A(13)i LET 
AII3l>Amii LET AII4)>A<lSli LET AUSI 

«AllOli LEI AllOl'Di LET i'l-li IF I>0 T 
HEN LET l>4 

3271 60 TO 3210 

3500 REH 

3501 LET T«ls LET S«li LET 0'A(4li UI A 
l4)<AI3ll LET AI3)>AI2h LET AI2)<A(lli 
LET AUl*Oi LET M*li IF Ii5 THEN LET 
I'l 

3502 BO TO 3210 

3550 LET T>2: LET B>5i LET 0*AIS)l LET A 
(SUA(7li LET AI7l«AI0)l LET AlOl'AlSh 
LET A(5l«Di LET WMt IF I>5 THEN UT 



SPECTRUM 



SOlO RUN 
8000 STOP 

0000 BORDER 4i PAPER 3l CIS 

9001 FOR I*I TO 20i BEEP .02, Ii NEIT 1 

0002 CLS. 

9003 LET A*-3i FB M70 TO 173 

0004 POKE 23076,11 LET A*AM 

0005 PRINT AT 4, A) PAPER Ij’ftBCD'j 
AT 5 ,A)'efgm')AT 0,A|‘ i JKL'iA 
T 7,Aj'Mt-JOP* 

0000 NEIT I 

0007 LET A»-3l FOR 1*174 TO 177 
OOOa POKE 23070,1) LET A*A>4 
0000 PRINT AT B,A; PAPER 4p*ftBCr:'( 
AT 0,A|'EFJ3.M'|AT IO,A)' I.JKL') 
AT ll,A)*MNOF'' 

0010 REIT I 

OCU LET A«-3) FOR 1*17B TO IBl 

0012 POKE 23670,1) LET A*Ai4 

0013 PRINT AT 12, Ap PAPER 4)‘)PBCr.' 
pAT 13,A)'EFC3M')AT 14, A)' l.j)- i. 
•pAT PS.Ap'MNOP' 

0014 NEIT I 

0015 LET A-3i FOR 1*182 TO IBS 
0010 POKE 23676,1) LET A*A»4 

0017 PRINT AT IO,Ap PAPER 4p‘)=iBCD' 
pAT l7,A)'EFGH‘pAT PB.Ap* lUK i_ 
'pAT IO,Ap‘riNOP' 

0018 NEIT I 

0020 FOR l*3 TO 20) PRINT AT I, Dp INK Op 



MIXEK 


35S1 60 TD 3210 

3500 LH I*3) LET S»0) LET 0-AU21) LET 
All2P*A<liP! LEI AlllMIlOli LET AdOl* 
A(9I) LET A(0)*0l LET I*M) IF I«S THEN 


INVERSE Ip SR16HI Ip' 'pAT I,l7p' 'pAT 
3,I-3p' ‘pAT 20,l-3|* ■) MEIT I 
0024 PRINT AT 3,20p INK 0) PAPEA 3) BR)6 
HI I; 'CODE NAHE.' 


3501 SO TD 3210 

3570 LEI T*4i LET S*l3l LET D*AdO)) LET 
AdOI>AdSI) LET Ad5l*Ad4)i LET AdOl 
*A(l3)i LET A(I3)»0) LET M+lt IF X*5 T 


0020 PRINT AT 0,20) INK 3) BRI6HT Ip PAP 
Efi Op' • 

0027 PRINT AT 0,20) INK 0| PAPER 4)“' 

0028 LET N»*" 


l€N LET I*l 

3571 SO TO 32t0 

5000 REN «» LOAD «l 

3001 INPUT 'ENIER FILE NAHE..'pNt 

5002 IF LEN NDPO THEN BO TO 500I 

5003 INPUT 'ENTER PICTURE NO • 2 TD l.'p 
NO 

5004 IF N0(2 DR N0>4 Tl€H 60 TO 5003 


0020 LET A*20 

9030 PRINT AT 0,20) PAPER 4|'*' 

003I LET »■” 

0035 LET ll•INKETi 

0030 IF IB*" THEN 60 TO 0035 

0040 IF 1B*CHRI 13 OR A>30 THEN 60 TO 0 

070 


5005 IF N0*2 THEN LET PLAC£*47704 
5000 IF NQ*3 THEN LET PLACE*SI600 
5007 IF N0*4 THEN LET PLACE*SS606 

5006 PRINT I PRINT 'PLEASE lAlT LOADINE 

) '{Nt 

5000 LOAD M CODE PLACE,4000 


77 



OOMFUTEH OAMEK JUHB 




7045 IF 46 THEK PDIIII AT 6,20| 

INK }| 66I6HT 1| PAPER Aj' *l L 

ET N4--1 LET H*"i LET A*20: GO TO «2 
1 

4050 PtlNT AT A,A| PAPES 4|It|'^‘ 

4056 FW N>0 TO lOl NETT N 

4054 LET A>A»tl LET 0‘CDDE Ui LET Nt>Nt 

tCWt (l-GI 

4040 60 TO 4055 

4070 REN 

4071 IF Nl«" OS Nt"*KBVCP' THEN LET L£ 
VEL>li LET TAREET*200i 60 TO 5 

4072 IF HI*‘W?AC* Tt€N LH L£VEL'2i LE 
T TAR6ET>2l>0i 60 TO 5 

4073 IF NM’BOSTPCO* THEN LET LEVa«3i 
LET TARSET*<Kl: 60 TO 3 

4074 IF NI*‘l600CPaR' THEN LET LEVEL<4 
1 LET TAR6ET>140t 60 TO 5 

4090 PRINT AT I0,20| INK 5) 6R16HT 1; PA 
PER 4|‘60RRY....'i FOR I«l TO 20i BEEP . 
02, It NEIT It 80 TO 4000 
4100 lORDER 7i PAPER Ti INK Oi CLG 
9110 PLOT 0,IA2t ORAN 233, 9l ORAN 0,-l2t 
DRAH -233,0! DRAN 0,12i ORAN 0,0 

4112 LET DIR>li LET P0S<1 

4113 LET l•4l LET Y>134 

41U PRINT AT 2.P06)' NII£R.,.8» D.5NITH 
1483 • 

4117 PRINT AT 7,2) INK 3| FLASH I; 8RI6H 
T OPTIONS..' 

4118 IP D1R>1 THEN LET POS«POS«ii IF PO 
S>3 THEN LET 0IR>0 

4119 IP DIR'O THEN LET P06>P0S-li IP PO 
S'l TISN LET DIR'l 

4120 BEEP .02,2 

9121 POKE 23438,6 

9122 IP INKETI-'l' THEN GO TO 4300 

9123 IP INKErO*'P‘ THEN 60 TO 4 

9124 IP IKEYM'D' THEN GO TO 4300 
4125 IP INKEYM'8' THEN STOP 

4124 IP lNKETi«-L’ THEN BO TO 3000 
9130 PRINT AT 10,0|'l - IN8IRUCT10N3,’ " 
•P - PLAY BAHE,'"*11 - DEFINE KEYS,'"'L 
- LOAD PICTURE, •'••6 - DUIT PR08RAN...' 
4150 60 TO 9114 
4294 STOP 

9300 SEN 4> INSTRUCTIONS •• 

9301 CL8 

9302 PRINT AT 0,3|'Riiitr - By D.SiitH 19 
95.' 

9303 PRINT "* Thi idll of tAi giio If t 
B RtorgtnlH i fcritn ditpUy, >ti 
IcH tht cooputir aill diopUy.' 

9304 PRINT ’• Thori t four dlfloritit icf 
ton diiAllyl, but you only kno> th( 41r 
It cod* nm for livil on*. I - NIIER - 



you *111 bi givH th« cod* ntti for tN* 
flblt Iivil.' 

9304 PRINT '* But tocotplitt t Itvtl you 
luit blit i tifgit, ibich ii iittt t 
citiln iiount.lf houivir you go o««r 
the tirgit you (ill bl 4bl* to ittoipt t 
hi liH icriin ilth i Hlghir torgit. 

9307 60 SU8 9990 

9308 PRINT "NOVEKNT,.,' 

9509 PRINT •r~—| To nviiyou uM t 
h* curior I Ikiyi., 

■ ■ 

UYili uhich it Dti thi Right hui 

d ildi 

lliply prill th* a kly..' 

9310 PRINT • Th* bill *iy to uork thi ki 
yi out is by prutici,.' 

9311 PRINT 'Scrolling.,. 

To 

Kroll lift prill 0, To icroll rl 

ght prill N, To tbindoni thi curr 
int icriin priii 'A',,,' 

9312 PRINT 'Natll 

Nhin you typi in thi codi nan 
for thi lull, if you laki in Kror lii 
ply prill thi 0 to rub out thi iliUki, 

9313 SO SUB 9990 

9314 RUN 

9300 REN ti DEFINE KEYS H 

9301 CLG 

9502 PRINT AT 0,5) INK 3) FLASH Ij'KEYS. 

9303 PRINT AT 3,2| ■UP..,')i INPUT Kidit 
PRINT KOm 

9304 PRINT AT 5.2!'D0NN. ..'jt INPUT Kil2 
It PRINT Kt(2l 

9305 PRINT AT 7,2)'LEFT,..')t INPUT KIIS 
It PRINT Kt(3l 

9304 PRINT AT 9,2|'R18HT...'{i INPUT K*l 
4li PRINT Ktl4) 

9307 PRINT AT 11,2) INK 3| FLASH 1)'FIIE 
D KEYS...' 

9308 PRINT AT 13,2j'SCRaL LEPT,..B')AT 
I5,2)'SCR0LL R18HT,..P')AT 17,2|'A60RT 6 
ANE...A' 

9309 INPUT 'OK y/N,..')YI 

9310 IF YI*'Y' THEN 60 TO 4 

9311 60 TO 9300 

9990 PRINT llj'ANY K£Y...'i PAUSE Oi CLG 
I RETURN 



LISTING 2 



F't LET 6»*'OOOOOOFFFFFFFfFF'i 
LET Hlu'OOOOOOOOOOOOOOOO* 

30 POKE 23474,170 

39 REN H REHENDER THE NO. TO ENTER 
IS THE LINE NUH8ER BEFORE THE CHECKSUN 

LINE..,** 

40 PRINT 'ENTER LAST OAIA LINE NO.TO C 
HECKOATA..IEI- 1700'"'THE LINE NO. BEFO 
RE THE CHECKSWTi INPUT 'NO...')! 

41 LET AMOl LET S>lli LET C«I2i LIT 0 
«13i LET E-141 IIT F«13 

43 CIS 1 PRINT AT O,0]'8IARTIN8 AT LIN 

E M 

30 LET L1NE>I 
51 LET 0LD<I/10 
S3 RESTORE LINE 
40 FOR Y'l/lO TO 233 
43 POKE 23474, Y 
70 READ AI,CHE» 

60 LET SUfl*Oi LET N*0 
90 F A*«“ THEN 60 TO 200 
too POKE U9R 'A'tH.UiVAL AI(1)*VAL API 
21 

110 LET SVN>6UNH4«VAL Ai(l)»VAL API2I 
120 LET N>*t| 

130 LET A(«AII3 TO ) 

140 60 TO 90 
200 REN M CHECK *4 

210 IF SUHOCHEC* THEN PRINT ’ERROR IN 
LINES ')LINE)‘ TO ’|UNE«3)'.'i STOP 
220 PRINT 'LINES 'iLlHE)' TO 'jLlNEfB)' 
ARE OK..,' 

230 LET LINE>LINEtlO 

240 NEIT Y 

230 REN •! SAVE «i 

253 IF 0LDO170 THEN 80 TO 300 

240 PRINT ‘•■'NELL-DONE., .'•■■SET READY 

TO SAVE 6RAmCS AS MCHINE-CODE. . . . 

270 PRINT II)'HIEN READY - ANY KEY.,') 
PAUSE 0 

280 SAVE 'CODE 1’ CODE 43406,20364 
290 PRINT ■•■ALL F1NI8HED..' 

299 STOP 

300 REH 

310 PRINT ■•■'NELL DONE,,.' NON RUN 

IT A6A1N FROn I700......T|£N YOU CAN SA 

VE IT AS CODE....' 

315 PAUSE Oi PAUSE 0 
320 RUN 

1400 REN «« DATA LINES l« 




9305 PRINT ■' Dnci you colplitl a llvll 




20 REN 

21 LET BJ-'FFFFFFFFFFOOOOOO'i LE 
T CA-‘F8F8F8FeFaF6FBF8'i LET Il*'l 
MFlFIFlflFlFlF'i LET EI«'FF8lBDBD 
BDBDDIFF'l LET Ft>‘FFei6l81BlB19lF 



CFC7C3C1C0FFFFFBF3E3C3B303' 

1703 BATA 17643 

1710 DATA 'FFffFFFFFFOOOOOOFFFFFFFFFfOOO 
OOOFFFFFFFFFFOOOOOCFFFFFFFFFFOOOMOOOOOO 
OOOOOOOOOOOOOOCOOOOOOOOOOOOOOOOOOGOOOOOO 
OOOOOOOODOOOMOOOOOEOEOEOEOEOEOEOEOOOAOO 



COKFimiRaAMliR JUHS 198S 




(OOEOEttEOEteOEOEKWlOlOlOIOOOIKIMOFFFFF 

FFFOJ030MJFFFFFFFFFOFOFOFO’ 

171S lATA 11700 

1720 DATA 'FTFFFFFFFFOOOOOOFFFFFFFFFFOOO 
OOOFFFFFFFFFFOOOOOOFFFFFFFFFFOOOOOOOOOOC 



OOOFCe20iei828ADDFOOOOOOOODOOOOOOOOOOOOO 




12l2l221tlEOOOOOOOOOOOOOOODi 



0OOEJE3E3E3OI01OOOOE1C1E1F3F3FFFFFFF1F1F 

IFIEIEICICIFFFFFFFFFFFOFOFO' 

1733 DATA 11731 

1730 DATA •FFFFFFFFFFOOOOOOFFFFFFFFFFOOO 
DOOFFFFFFFFFFOOOOOOFFFFFFFFFFlFlFlFOOOOO 



FIFF8F8FIFIFOOOOOOOFFFFFFEO€OEOEOFFEOF(» 

B7C3C3C7CFDIF1FIF1F1F1F1FIF' 

13S DATA 10A21 

17*0 DATA ‘FDFef8FDFeFDFDF80707C70707070 
707COCOCOCOC0C0C0COO303O303O3O3O3O3FDFDF 
DF8FBF8FDFDD7C7EFFFFFFEFCFBCOCOCOSOOOOOO 
00003C3030100000000FBFBF8F8F8F8FBFOOOOOO 

0O0fCFCFAfAF9FWBF8O7O708OaiClOE0£O01O18 

2624At43l38CDC0202011110E0E‘ 

17AS DATA 13AA7 

I7S0 DATA ‘EOEOEOEOEOEOEOEOOOOOOOOOOOOOO 
00003030303030S0303FOFOFOFOFOFOFOFO(IE3E 
FFFFF7F3FIF0000000001010l0103030303FFFfF 



000707088e8040403D31ClC222241Aie0800707D 

tOeiOIOEOEOOIOie2B24444383B’ 

1753 DATA 10214 

17M DATA •0000O0OO0DO000007F7F3F3F3F3F7 
F7FB18IOlOIOlO181DlFI^FFFFFFFFFFFFFO0OO0 
101E3E3E3E3FFFFFFF3F3E1EICOC1C1E1EIF1FIF 
IFIFOFWOFFFFFFFFFFOOOOCOOOOOOOOOOOOOOOO 




OOOOOOOOOOOIFIFIFIFIFIFIFIF' 

1815 DATA 882 

1820 DATA 'F8F^8F8F8F8FDFBOFOfOFOFOFOFO 
FOFFF8080e080BOB080FCFC7C7C7C7C7C7CFBF6F 
BF8FDFBFeF8OFOFOFOFOF0FOFOF8O6O8O8OeOBO8 
O807C7C7C7C7C7C7C7CFeFeFV8FBFBF8F80FOF0 
F0Flf3F7FFF8O808OFFFFFFFFFF7C7CFffBF0EDC 
080F8f8FBFFFFFFFFFFOOOOOOfFFFFFFFFFOOOOO 
OFFFFFFFFFFOOOOOOFFFFFFFFFF' 

1823 DATA 20178 

FFF010307FFFFFFFFFF00000010iei4l21]00000 

CFElO10IOIO10IOlO10OO0O3a7E7C7C3BOO|f0FO 

OBOCOFFFFFFFFFFOFOFOFFEFC^SIOIOIOIOIDIOI 



srt:i rill if 



000000000000103040ei02040eoeoc0201008040 

201FBFeF3FBFaFBfeFBOI010IOI0303050S' 

1805 DATA 13237 

1870 DATA 'FFFFFFFFFFOOOOOOFFFFFFFFFFOOO 
OOOFFFFFFFFFFOOOOOOFFFFFFFFFFOOOOCOOOOOO 



1B73 DATA 6702 

IB80 DATA 'FFFFFFFFFFOOOOOOFFFFFFFFFFOOO 
OOOFFFFFFFFFFOOOOOOFFFFFFFFFFOOOOOOOOOOO 



1B8S DATA 3420 

1880 DATA 'FFFFFFFFFFOOOOOOFFFFFFFFFFOOO 
OflOFFFFFFFFFFOOOOOOFFFFFFfFFFlFlFlFOOOOO 



0001FIFIFIP1F1FIF1F000000100000000200001 

00000000000050307070FOFlFlFFFFrFFFfFFFFF 

F1F1F0F0F07FFFFFFFFFFFFFFFF' 

1885 DATA 10008 

1800 DATA 'FeFefBF8FDF8F8FB080811112l2l4 
I410FOFQFOFOFOE080FFtfOFOFOFOS010FOFP6F 
eFeFDFBFDFSFFOIOIDlOlOIOlOSOOOOOOOOOOOOO 



MIXEH 



0OOCDCO2O2DIU10E0E7D70D88I04040303ICIC2 

222414iaOBOO7O7OBOI10l0EOEO' 

1765 DATA 11843 

1770 DATA '0080B080808080DOFFFFFFFBFCFEF 
FFFFOEOCOOOOOOOOOSOlFlFlFlFIFlflFlFOOOOO 
OFeF8FeF8FaF7F3FIFOFOFOFOFOCOEOFOF87C3EI 

OOOOOOOOOOOOOOOOOOOOOOOOOOOIFIFIFIFIFIFI 

FIF01O1828344A43I3ICOCO2D2O1111OE0E70TOB 

DD8040A0303lflF3F3F3F5F8F8F' 

1775 DATA 10810 

1780 DATA 'FBFBF8F8F8FBF8FaoOOOOOOOOOOOO 



000(BFIF8F8FaFBFeF8FF7F3FlF0FOFOFOFFFFFF 

FFFFFFFFFFFBOCOEOFOFDFCfCFC 

17D5 DATA 12300 

1780 DATA 'OOOOOOOOOOOOOOOOOOOOOOOCOOOOO 



OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO 



OIOOOOOOOFFFFFFFFFFOOOOOOFFFFFFFFFFOOOOO 

OFFFFFFFFFFOOOOOOFFFFFFFFFF' 

1835 DATA 12344 

1840 DATA '00000001030508I10000001FODOOO 



OOOCOOOOOFFFFFFFFFFOOOOOOFFFFFFFFFFCOOOO 

OFFFFFFFFFFOOOOOOFFFFFFFFFF' 

1845 COTA 7184 

1850 DATA 'OOOOOOFF404040400000001010IOI 
OI000000001010101011FIF1F1FIFIFIF1F40404 
040404D404DIDI01010101F1D10010ID10101FFO 
10I1F1F1F1F1F1FIF1F4040404040404040IOI01 
OIOIOIOIOIOOIOIOIOIOIDIOIOIIFIFIFIFIFIFI 
flFOODOOOFFFFFFFFFOOOOOOFFFFFFFFFFOOOOOO 
FFFFFFFFFFlFlflFFFFFFFFFFF' 

1855 DATA 808B 

1000 DATA 'FFFFFFFFFFFBFBFBFFFFFFFFFFOOO 
OOOFFFFFFFFFFOOOOOOFFFFFFFFFFOOOOCOFBF8F 
BF8F8F6F8F8O0O0OOOOOOOOODODOOO0OID101O1O 
!010000B080a08D8080F8FeFBF8F8F6F8FIO(KIOO 



OOOFeF8FeF8F3F8F8Fe0IOI011F2I4|8DBD' 

1805 DATA 10010 

1810 DATA '808068B86484828300000000000DO 
DOOOOO2OO0OODOO0OIO0OODO10300O01F5nFFFF 



70301 OOOOOOFBFOEOCOCOE07D3F ' 
1815 DATA 7348 




J823 DATA 1812 

1830 DATA ‘010D0000100040000000002000000 
4M0703030020000DOOFFFFFFlFIFlFlFlFflOOfll 
000040000000D0010000000030DOOOOD42000000 
0001FIF1FIFIFIF1F1F00020000100 0000000200 



COKTUTEBOAUER JUUZ 1986 




mmtwMmmmmmmiiimmK 



^H{H»OSO<i«M00004«l00401FlFIFIFlFtn 

lQ303(l747lFIFirFFFFFFFFFFFF' 

1F33 DATA 3A70 

1940 DATA 'FDFIFeFDFBFDFDFBBDDDBDBDBBBDD 

DBB3F2fi202020202020FC0404»404040404F8FBF 

BFBF8FBFBFBBSBBBBBnBBtBDIB2020202t)202Cl2 

02»4«4044404040424F8FBFBFBFBFeFBFBB»BI 

DIBBBBDBBI0203B202020202B2034S4242424242 

404F8FBFBF8FBFeFBFeBDBBB8BBIDIBIBBD20202 

02B20202B3F0404040404B404FC 

1943 DATA UB4A 

1950 DATA ‘BDDDtDDDDDBDDDDD0001030707070 
707fFFFFFFFFFFFF9F0fFFFFfFFFFFfFFFflDBDD 
DBDBDBDBDBD07O7O7O7O7D7O707FCfOF0FOFOFBF 
FFOFF7FOOOOOOOOFFOOBDDDDDIDBDBDIDDD07070 
70704D507«5EFDFBf7FFFFFFFFFFFFFFFFFFFFFF 
FFFDDBDDDBDBDUDDDD0000200044000000FF3FO 
FO7O3O3O7CFFFFFFFFFFFBO0O9O' 

1953 DATA 1 3926 

i960 DATA 'FFFFFFFFFFfFFFFFCOCOFAFBFBFBF 
BFiODOOD)00000000003F3F3F3F3F3F3F3FFFFFO 
»ll0103FF03F8FBFeFBFeFtf8FB00006000100» 
0003F3F3nf3£3t3B30FDFEFFFFFFfFFFFFFBFB7 

WWFFFFFFFFFf7F3FlFCOC08387CFFFFFFFOOOOO 

I9AS DATA IS47D 

1970 DATA 'FFFFFFFFFFFFFFFFFFFFFFFFFFFFF 
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEOCCD 



OOOFFFFFFFFFFFFIFIFOOOOOOOOIIOOOOOOOOOOO 

O2OOMOOW0C0AO00OMODO2O00IF1F1F1F1FIF1 

OOOOOIIDDOOIFIFIFIFIFIFIFIF’ 

1973 DATA 11047 
19B0 DATA •FBFDFBF8F8FBFeFBB9B3ASe991AlC 
DBTOOOOOCMKiOOFFfFFFOOCOOOOOOOFFFFFFFFFFF 
DF8F»FDFBF|FFFFOOOH7061432FFFFO(KlOFFOOF 
FOOFFFFO»OOC0102E44FaFBFgF9FBFDF6F84iaOO 

OOOFBFDFBFFFFFfFFFFOOOOOOFFFFFFFFFFOCOOO 
OFFFFFFFFFFOOOCOOFFFFFFFFFF' 

19D3 DATA 17733 
1990 DATA '9DD7A39ie9B3C3ElD10000000(KiOO 
O0«fFFF?F3FIFOF07O3COE0fOFSFFFFFDF0FFFfC 

38O0OOO0FFFFFFFFFF224lBOFFFFFFFFFF0OFfOO 
FFFFFFFFFF44D201FFFFFFFFFF' 

1995 DATA 12U1 
2000 DATA ’OF0703OI4OOOOOOOFFFFFFFFFF0O0 

OOCOOOODOFFFFFFFFFFOOOOOOFFFFFFFFFFOOOOO 
OFFFFFFFFFFOOOOOOFFFFFFFFF- 
2003 DATA 9460 
2010 DATA '0000040000 
OOOOOOOOOOOOOOOOOeOlFlFlFlflFlFlFlFFFFFO 
000000004FFFFFF0440000000IOFFFFOOOI00100 
OOOFFFF1F1F1F1F1FIF003CB17E0000004049A01 



OOB0400000000041000000000001F1F1FIF1FIF1 

FIFOOOOOOFFFFFFFFFFOOOOOOFFFFFFFFFFOOOOO 

OFFFFFFFFFFIFIFIFFFFFFFFFFF* 

2015 DATA 9042 

2020 DATA 'FFFFFFFFFFFBFDFB'+BliBJ^DAiW 
♦E»+F|tF»4C«+FJtE»tf**W4F4*F4*E» 

2025 DATA 24072 

2030 DATA D<«l$»Dt«9A*Fi»HI»FI»Et»FI»HI» 

FI4E4»FMH4»FA>£I 

2033 DATA 17374 

2040 DATA Dt4M«DMDF4EI*Ft»Ht«Ft*EMFI'f 

H14FI>E(»F94Ni»Ft 

2043 DATA 17374 

2030 DATA B4m4Df«'FFFFFFFFFFIFIFIF'«Ft 
«fl«EI*lt4Fi4Ei«F<»DI*EI>FI<F««Dt 
2033 DATA 18213 

2040 DATA C»*FB«F»*F»*C»*HF»H**HF*C»*FF* 

FF«F$*C(«E*«E(»EI 

2043 DATA 20212 

2070 DATA E»4H**F»«£»«Hf4H»»H»*H»4F»4M4 
E««EF*EltH<»Ei*E> 

2075 DATA 13234 

2080 DATA E«»FttHliEl4Ki«HlfHI*Ht»E(«Et* 

H}«FME}4Et4H<«Et 

20B3 DATA 13234 

2090 DATA FF«f$4F$<DF*H4«Ht<H<»DMFtfFt« 
Ft*D(4Et4E«4E<«D( 

2093 DATA 13248 

2100 DATA C44EFiEt4Et4CMF44FI4F|4C44Htt 

Hi4HtfC<4F(4Fi»FI 

2103 DATA 20212 

2110 DATA E(4Ht4Et4EF4Ft4Ht4Et4Et4Ht4Hi4 
H*fl«4E94tll4FDtE» 

2113 DATA 13234 

2120 DATA Ei4Et4Kt4Et4El4El4H|4FMH<»HM 

H$*X44E*4F|4M4£t 

2123 DATA 13234 

2130 DATA E<4E|4Et4D(4F44Ft4F$4gt4H44H44 
HI*D44F|4F«4F»4D» 

2133 DATA 13248 

2140 DATA CI4F$4F(4EF4C>4i4Et4F(4C«4£t4 
F«4F|4>F8FDFrFFFFFFFFF*4et4BI«BI 
2143 DATA 24072 

2130 DATA Fi4H44Fl4E(4Ft4lU4Ft4ft4F<4Ht4 

FF4Et4Sl4et4Sf4eF 

2133 DATA 17374 

2140 DATA E44FA4H04f|4E44F*4Hl4Ft4Et4FI4 

Ni4Ft46$48l4et46l 

2163 DATA 17374 

2170 DATA »4Fi4Fi4DF4F|4Ef4Ft4D<4Ft4F|4 
E»4D»46«»8t4Bl4'lFlFlFFFFFFFFFFF* 

2173 DATA ID213 

2180 DATA 'FFFFFFFFFFFFFFFFFFFFFFFFffFFF 
fFFFFFFFFFFFfFFFFFFFFFFFFFFFffFFPFtFFFBF 
9f9F9f»FDFIFFFFFrFFFFFfFF7FFFFrFFFfFFFFF 
FFFFFFFFFFFFFFFFFFFFBFBF8F8FeF8FBFB3E3El 
£lF0F07O3O0FFFF7F3F9FFFFF00FFFFFFFFFfFFF 
FOOFBFeFBFBFeFSFEFBOOOOOOOOOOOOOOOOOOOOO 
OOOOOOOOOOOOOOOOOOOOOOOOOOO* 

21DS DATA 234D1 

2190 DATA 'FfFFFFFfFFFFFFFFFFFFFFFFFFFFF 
FFFFFFFFFFFFFEFEFEFFFFFFFFFFFC04040FFFFF 
FFFFFFFFFFFFFFFFFTFFEFFFBFOEFDCBBTOEOCOO 
OOOOOOOOOOOOOOOOOOOFFFFE7CF9CFOEOOOEOCOB 



2193 DATA 13007 

2200 DATA 'FFFFFFFFFFOOOOOOFFFFFFFFFFOOO 
OOOFFFFFFFFFFOOOOOOFFFFFFFFFFOOOOOOOOOOO 
OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO 



2203 DATA 3413 

2210 DATA 'FFFFFFFFFFOOOOOOFFFFFFFFFFOOO 
OOMFFFFFFFFFOOOOOOfFFFFFFFFFlFlFlFOOOOO 



OOOIFIFIFIFIPIFIFIFOOOOOOOOOOOOOOOO 
OOOOOCOOOOOOOOOOOOOOOOOOOOOIFIFIFIFIFIFI 
F1F000003FFFFFFFFFCOOIBFCFEFFFFE30100000 
OOOOOBOBDeOlFlFlFlflFlFlFlF' 

2215 DATA B844 

2220 DATA 'FBf8FFFFFFFFFFFFOOOOFI7EFFFFF 



FFFFFFFFFFFFFFFFFFFFFFFffFFFOFOFBFSFUFCF 

EFEOOOOOOOOOOOOOOOOFFFFFFFFFFFFFFFFFFFFF 

fffffffffffffffffffffffffffoooobobocock 

oeofffffffffffffffffffffffffffffffffffff 

FFFFFFFFFFFFOFOFOFOFDFBFBFB' 

2223 DATA 23444 

2230 DATA ■OOOOOOOOOOOOOOOOfF7F3f 1F0F070 
30IOODOCCCOFOfBFCFEOOOOOOOOODOOOOOOOOOOO 



0804020I01D0000004020IF0102’ 

2233 DATA 5109 

OOOODOOC0OOOOCOOO003931210202O4040B00OO0 



2245 SATA 1499 

2230 DATA 'OO0OO0O0OO3B3B0O0O0O0O000O0OO 
OOOeoeOBOBOBOeoeOBOlFIFlFIFlFlFIFIFOOOOO 



OOOIFIFIFIFIFIFIFIFOOOOOOOOOOO 0010004081 

F1F80403F0000000000402010SB44221I0800000 

00000001EE41F1F1FIFIF1F1FIF' 

2233 DATA 4148 

2240 DATA 'FFFFFFFFFFFFFFFFfFFFFFFFFFFFF 
FFFFFFFFFFFFFFFFFFFFCfCFCFCFEFEFEFEFFFFF 
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 
FFFFFFFFFFFFFFFFFFEFFFFFFFFFFFFFFOFFFFFF 



|3 DATA 3i 



COMPUTBB GAMSa Jims 19S6 



flflF3F3fVFFFFFFffFfFFFfFfFFFFFFfFFfFFF 

FFFOMOOMM1O101OO7F7FFFFFFFFFFFF9FFFFF 

FFFFFFFCOOOFFFFFFFFFWOOW8' 



2273 DATA 1M24 




FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 

FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 

FFFFFFFFFFFFFFFFFFFFFFFFFF' 

2303 DATA 2f4Af 

2310 DATA 'OOOOOOOOOODOOOOOODOOOOOOOOOOO 
OOOOO0OOODOOO4OOOOOOO4OO400OOOODWODF7EF 
DFDF7EFOOFF7£FDFDF7£FDFOOFFFDFDf7£FDFDFO 
OFFFDF7EFDflF7FOOFFFFFFFFFfFFFFFFFFFFFFF 
FFFFFFFFFFFFFFFFFFFFFfFFFFFFFFFFFFFFFFFF 
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFf 
FFFFFFFFFFFFFFFFFFFFFFFFFFF * 

2313 DATA 22UB 

2320 DATA '00000000000003000000000000000 
0000103070F1F3F7FFFFFFFFFFFFFFFFFFFF7EFD 
FDf7EFDOOFFEF»FIF7EFDfBOOFFDFDF7EFDFBF70 
OfFIF7eFDflF?£FOOFFfFFFFFFFFFFFfFFFFFFFF 
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFfFFFFFFFFFF 
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 
FFFFFFFFFFFFFFFFFFFFFFFFFFF' 

2323 DATA 23042 

2330 DATA 'FFFFFFFFFFFFFFFFFOtFDFDFFDFD? 
D001FEFF7FDIDIDDDO0FFFFFFFFFFFFFFFF7EFDF 
DF7EFDFOOFFFEFDFDF7EFDFOOFFFDFDF7EFDFBFO 
OFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFfFFFFF 
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 
FFFTFFFFFFfFFfFFFFFFFFFFFFFFFFFFFFFFFFFF 
FFFFFFFFFFFFFFFFFFFFFFFFFFF' 

2333 DATA 30DIB 
BODO FAME 230 



LISTING 3 



I »E<I PICTORE DESIENER... 

3 BORDER 5i PAFER 4; iH( Ol CIS 

4 DO SUB 4000 

5 

6 BORDER 4i PAPER 4s IKK Oi CIS 

7 POKE 23038,6: LET LOOP‘0 
B LET I»ls LET Y«1 



9 LET IRACE'O 

10 PRINT AT 0,0; INK 0; BRIDHT 1;'BCRE 
EN DRANER - B7 D.SNITH..'” INK 0|' USE 
THIS PR06RAM TO DRAN TOUR ONN SCREEN DI 
SPLAT'S NHICH CAN BE LOADED IN TO HY HI 
lER FRDSRAN' 

11 PRINT AT 0,16|'KEYS..,'|AT B,IB|‘US 
E CURSOR, 'lAT 10,lBs‘I-lW PIIEL.'jAT 12 
,18|*P-PAP£R PIIEL.'iAT l4,ia;'F-FILL,C- 
CLS,'|AT IA,IB;'0-OUTER L1NE,'|AT IS, IS; 

■E-EJIT..' 

12 IF IRACE'O THEN PLOT I.Ys PLOT OV 
ER liI,Y 

13 IF TRACE'l THEN PLOT I,T 

14 LEI AMINKETS 

15 IF Al»" THEN BO TO 12 

18 IF TRACE»0 THEN PLDI l,Yi PLOT OV 
ER 1;I,Y 

19 IF TRACE*1 THEN PLOT I,Y 

20 IF Al3'5' AND I>1 THEN LET IiJ-l 

21 IF At«'S' AND «12B THEN LET I<1M 

22 IF Al»’i' AND Y>0 THEN LET Y-Y-1 

23 IF AI-'7’ AND Y<12B THEN LET Y*T»1 

24 IF AM-r THEN FDR NO TO 20i JEEP 
.02,N: NEIT Ns PRINT AT 20,18; INK 3| F 

LASH 1;MNK ON.'i LET TRACE»ls SO TO 12 

25 IF AI-'P* THEN FOR N«0 TD 30s BEEP 
.02, Ns NEXT Ns PRINT AT 20,18;' 

's LET TRACEOi PLOT OOER 1;J,Y 
20 IF At°'F' THEN 80 SUB 400s LET 
4: LET Y^M 

30 IF Al='l* AND 1)5 THEN LET X*l-5s 
IF TRACE'l THEN PLOT OVER TRACE|«,Ys D 
RAN 3,0 

31 IF AJ-'C AND J<123 THEN LEI Y«I«5 
s IF TRACE--1 THEN PLOT OVER TRACE;!, Yi 
DRAN -5,0 

32 IF A«='l’ AND Y>4 THEN LET Y«Y-5s 
IF TRACE*! THEN PLOT OVER TRACE;l,Ys D 
RAN 0,3 

33 IF Al*'" AND Y<123 THEN LET Y*Y*5. 
s IF TRAC£*1 THEN PLOT OVER TRACEiI.Ys 
DRAN 0,-5 

34 IF AI*'E' THEN BO TO iO 
33 IF At*'0' THEN 60 SUB 31 

37 IF A1*'C THEN FOR H*0 TO lOs BEEP 
.02, Ns NEXT Ns CLS i BO TO 7 

49 FOR N*0 TO 20s NEIT N 

50 90 TO 12 

51 REH ** OUTER BOX If 

32 PLOT 0,0s DRAN l2B,0i DRAN 0,128s D 
RAN -128,0s DRAN 0,-128 

33 PLOT I,J: DRAN 12t,0s DRAN 0,I2ii D 
RAN -126, Os DRAN 0,-126 

34 PLOT 2,2s DRAN 124,0s DRAN 0,124i D 
RAN -124,0s DRAN 0,-124 

55 PLOT 3,3i DRAN 122, Ol DRAN 0,l22i D 
RAN -122, Ol DRAN 0,-122 
36 PLOT 4,4i DRAN 120, Os DRAN 0,120t D 
RAN -120, Ol DRAN 0,-120 
57 LET I*lOi LET Y*10i LET TRAC£*0: RE 
TURN 

60 60 SUB 300 

61 PRINT AT 6,18;' *;AT 7,1 



SPECTRUM 



fll'PICTURE HO. ■;AT8,1B;' 

;AT9,IB;' 2-4 

63 FOR N*10 TO 20l PRINT AT N,18;' 

'I BEEP .02,Ki NEXT N 

64 PRINT AT 13, IB; INK 6; DRI6HT I; FL 
ASH Ii'PLEASE NAir.'lAT 17,18; INVERSE 1 
I'STORINB..' 

65 INPUT 'PICTURE NO,. '|N0 

66 IF N0<2 OR N0)4 THEN SO TO 65 

67 IF N0*2 THEN LET S*l86 
6B IF K0*3 THEN LET 8*202 

69 IF NOM THEN LET 8*218 

70 LET OLDS*Sl LET L00P*0 

71 LET IPOSil: LET YP05*128i 60 SUB 30 

0 

72 LET 9»S*ll LET lP0S*33i LET YP0S*I2 
8; SO SUB 300 

73 LET 8*Sili LET IP0S*65: LET YP0S»12 
Bs BO SUB 300 

74 LET S'SHi LET XPD8*97i LET YP05*12 
8i 60 SUB 300 

73 REH 

76 LET 8*S*li LET IPOS*ls LET yP05*97i 
60 SUB 300 

77 LET 8*S*ll LET XP0S*33s LET YPQS*97 
8 6U SUB 300 

78 LET S*S»ll LEI IP0S*65s LET YP0S*9T 
s 60 SUB 300 

79 LET S»SHs LET XP0S»97s LET YP0S*97 
I 60 SUB 300 

80 REN 




81 LET 9=S*ls LET XPOS*ls LET YP0S*65i 
60 SUB 300 

62 LET S’S+ls LET XP0S*33i LET YP0B*65 
I 60 sue 300 

83 LET 6*S*li LET XP0S«65s LET YP£15*63 
s SO SUB 300 

94 LET S»8+li LET IP08*97s LET YPDS*63 
I BO SUB 300 

85 REN 

86 LET S*S»ll LET IPDS*ll LET YP0S»33i 
SO SUB 300 

87 LET S*S»li LET IP0S*33i LET YP05*33 
I 80 SUB 300 

8B LET 5*S*li LET XP0S*63i LET YP0S*33 
I 60 SUB 300 

69 LET S*S*li LET IPDS»97i LET YP08*33 
I 80 SUB 300 




COKPDTEB aAmB jum 





•(O RE« ♦♦ 

91 CIS 

92 LET FM ISOLDS TO QL0S*J 

93 POKE 23t7i,Ii LET AiAM 

94 PRIHT Sr 4, A; PAPER 4|’rtDr 

AT 7,Ai'efgm’iAT 8,A|' L.jt i ‘(A 
T 9,Ai'MNOF* 

95 REIT X 

96 LET A-4i FOR X=0LDS*4 TO OLOSO: L 
ET A>A*4i PME 23676,1 

97 PRIRT AT 10, Ai PAPER 4|’Ht ... i ' 
iAT U.Ai'EP GM'iAT 12, AC T. il i 
'lAT 13 ,A|*mm-ii‘' 

99 REIT X 

99 LET A*-4i FOR I.OLDS^B TO OLDSMll 
LET PORE 23676,X 
IW PRiHT AT 14, A| PAPER 4|* RE c i.>' 
iAT 15,A|'ePC-i-i'(AT 16, AC I.ii i 
•;AI l7,ACi iMijiR' 

101 KEIT X 

102 LET A-4i FOR X*OLOS*12 TO OLDS+19! 
POKE 23676,1) LET A>A>4 

103 PBIMT AT 19, A; PAPER 4|'.:ilh.c I 
|AT 19,ACt r ..-.H'jAT 20,AC ^.JKL 
■|AT 21,A|'l-llJ..:ip* 

104 NEXT I 

105 IF LQOP'l THEN RETURN 

106 INPUT 'ENTER FILE RARE TO SAVE AS . 

.... -tMI 

107 IF Nl>" OR LEK RtllO THEN SO TO 1 



109 IF N0<2 THEN LET PLACE'47704 

109 IF NQ.3 THEN LET PLACE«51900 

110 IF R0°4 THEN LET PLACE<33996 




111 SAVE N< CQOE PLACE, 4000 

112 PRINT Ili'ALL SAVED...'! PAUSE Oi R 



199 STOP 

200 REH •» SET UP UDS'S H 

300 REN 4«l 

301 LET r>Oi DIN AIBI 

302 PONE 23676, S 

302 FOR 0*YPQS TO VPOS-32 STEP -9) FOR 
N<XPDS TO IP0S*3I STEP 9i FOR C’O TO 0-9 
STEP -! 

304 DIH A19I 

305 FOR 6=0 TO 7 

306 IF POINT 1N*6,C)=1 THEN LET A16*U 

307 IF POINT IN«S,C)=0 THEN LET AISMI 
“0 

30S NEXT 9 




309 LEI T0TAL<All)«126»A(2)>64tR<3l*32^ 
AI4lP16«AlSI>9«A(61M+AI7)i2«AI8Xl 

310 POKE USR 'A'*T.TOTAL 

311 LET T=T*1; NEXT Cl LET T=T-li NEXT 
Ni NEXT 0 

312 RETURN 

400 REH t* FILL 

401 DIN IllDOOh DIN VIIOOO) 

402 LET XS=ll LET Y5=Y 

403 LET HEAD'Oi LET TAIL'O 

404 60 SUB 450 

403 IF HEADllOOO THEN RETURN 

406 LET TAlL=(TAlLt|) 

407 LET IT-XlTAlLli LET YT=Y1TA1L) 

410 IF POINT aTHfl,YTl=0 THEN LET XS 
>tT<lHi LET V9=YT| 90 SUB 450 
420 IF POINT UT-l»l,YT)eO THEN LET XS 
=II-l»li LET YS=YT: SO SU9 450 
430 If POINT (XT, YTH1*0 THEN LET IS=X 
Ti LET YS'VTH: 60 SUB 450 
440 IF POINT 1XT,YT-I)*C INEN LET XS«I 
Tl LET YS=YT-li 60 SUB 450 
442 IF KEAS>TAIl»l THEN RETURN 
444 SO TO 405 
450 PLOT XS.YS 
460 LET H£AD=INEAD«1I 
470 IF HEADHOOD THEN RETURN 
475 LET IIHEADI>I9i LET VIHEAO)=VS 
460 RETURN 

500 REN <1 OPTinS <t 

501 FOR N=8 TO 20) PRINT AT K,16C 

’) BEEP ,02,N) NEXT N 

502 PRIHT AT B,18| INK 3| FLASH 1; BRIB 
HT li'OPTlON'S,.' 

503 PRINT AT lfl,lB)'S-STORE,')AT 12, IS) 
■8-SUIT, '|AT 14|18CL-LDAD.,' 

504 POKE 23658,9 

505 IF INKEYI.-S' THEN RETURN 

506 IF 1NK£Y9«'L' THEN 90 TO 550 

507 IF INK£Y»='8* THEN STOP 

509 60 TO SOS 

510 REN «t LOAD «i 

550 LET LOOPil 

551 INPUT 'ENTER FILE NAHE...‘|N4 

552 IF LEN Nt>10 THEN 60 ID 551 

553 INPUT 'ENTER PICTURE NUN9ERI2 TO 4) 
I'lHfl 

554 IF N0<2 OR NII)4 THEN 60 TO 553 

555 IF H0«2 THEN LET PLACEU77C4! LET 
0LDS=I66 

556 IF N0>3 THEN LET PlACE>SlBOOi LET 
0LDS=202 

557 IF N0=4 THEN LET PLACE‘55996: LET 
DLDS=219 

559 LOAD Nt CODE PLACE, 4000 

559 60 SUB 90 

560 BD TO S 
9999 STOP 

9000 REN H INSTRUCTION tt 

9001 PRINT INK 6) FLASH 1| 8RI6HT liAT 
0,9CSCRE£K DRANER.' 

9002 PRINT AT 4,0)' THIS PR06RAH NILL A 
LLDN YOU TODRAH YOUR DNN PICTURE NHICH C 
AN BE SAVED ON TO TAPE , NHICH TKENCAN B 



E LOADED ON TD THE NAIN HIXER PRQSRAH 
..SO LONS AS lOU XNON THE CODE NAHE FO 
R THAT LEVEL..’ 

9003 PRINT INK 6| FLASH Ij BRIEHT 1; 
' OPTIONS. '{ INK 0| FLASH 0) BRIEHT 0| ' 

' O-OUIER LINE.. ■"■THIS CONNAND DRANS 
A BOX AROUND THE PICTURE AREA..' 

9005 SO SUB 9090 

9006 PRINT AT 0,0) INK 6; FLASK 1; BRISK 
T li'ORTlOHS...' 

9007 PRINT AT 4,0|'F-FILL..,*' " TO USE 
THIS OPTION SINPLY PlACETHE CURSOR INSID 
E THE ITEN NHICH YOU NISH TO FILL IN." 

'NOTE... IF THE AREA IS TO lARSE THE CO 
NfUTEH NILL ONLY FILL HALFOF IT IN...' 
9006 PRINT "'ALSO.. MCE THE COTPUTE HAS 
FINISHED THIS ROUTINE THE CURSORNIL 
L BE RETURNED TO THE CENTRE OF THE SCRE 
£N...‘ 

9009 90 SUB 9090 

9010 PRINT AT 0,0| INK 6) FLASH 1; BRIBH 
T ICOPTiONS...* 

9011 PRIHT ■•'•1-lNK PIXEL...’ '■ THIS 0 
NNAND NILL TURN OK THE INK PEN, NHICH NI 
LI ALIGN YOU TO NOVE AROUND THE SCREEN 0 

RANINS ALINE BEHIND YOU.. P-PAPER PI 

XEL. .,■■'■ THIS CONNAND NILL TURN OFF TH 
E INK AND YOU HILL BE ABLE TS DRANOVER L 
INES, THIS NILL BLANK IHEHOUT..* 

9012 SO SUB 9090 

9013 PRINT AT 0,0| INK 6) FLASH I| BRIBH 
T li'OPTiONS...* 

9014 PRINT "■'C-aS,,.'— THIS CONNAND 
NILL ERASE THE PICTURE NHICH YOU HAV 

E done.. E-EIIT..,’"' THIS CONNAND 

HILL ALUM YOU TO EXIT THE DRANIN6 NODE. 
ONCE YOU HAVE PRESSED THIS YOU 
HILL BE 5H0NN THREE NEN CONNANDSHHICH 
ARE AS FOLLQHS)-’ 

9015 GO SUB 9090 

9016 PRIHT AT 0,0) INK 6; FLASH 1; BRIBH 
T ICNEN COHHANDS...’! INK 0) FLASH 0; B 
RISHT Oi " 'S-STOR£ PICTURE.'"* NITH TK 
IS CONNAND YOU NILL BE ABLE TO STORE TK 
E PICTURE AT A CHODSEH AREA (2 - 41 THI 
S IS IHELEVEL OF THE NAIN BIXER SANE.,., 

9017 PRINT "' STORING THIS TAKES A VERY 
LONS TINE - AT LEAST HALF AN HOUR " AS 
THE CONRUTER HAS TO FIRST STORE ALL 

THE SCREEN PIXELS, THENIT HRS TO SORT T« 
SE OUT IN TO U.D.S'S,,..' 

9016 60 SUB 9090 

9019 PRINT RT 0,0) INK 6) BRI6HT 1) FLAS 
H li'NEN ONHANDS..,' 

9020 PRINT "•'L-LDAD,..'"' THIS CONNAH 
D NILL LOAD A SCREENBACK ONTO THE CONPUT 
ER FOR ALTER-flTIOHS.,-RENENB£R THE LEVEL 

9021 PRINT '—O-SUIT...-— THIS NILL A 
LLON YOU TO EXIT THEPROSRAN COHPLETLY,,' 

9090 PRINT #1|'ANY KEY...' 

9091 PAUSE 0) CL5 ) RETURN 
9999 STOP 
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Ever wanted fame and fortune in one of Britain's 
leading computer magazines? 

Do you think that anything that you have 
programmed is up to our standards? 

We are looking for programs to publish for the 
following maohlnes: Commodore 84. VIC. C16 Plus/4 
3peotrum, Orlo/Almoa, Atari 400, 600XL, BOO, 800XL, 
80XZ, BBC, Electron, Amstrad and TI-99/4A (BASIC or 
Extended). 

All programs should he recorded on tape as many 
times as possible and at the most reliable baud rate 
(where applicable). Ko printed listing Is necessary as we 
oan do our own except In the case of the TI-89/4A where 
a listing produced on a computer printer 1 s absolutely 
neoassaiy. Ho handwritten or typed listings are 

Any tape must be clearly marked with the program 
name your name, the machine It is Intended for, and 
your address. 

Documentation should run to our normal style with 
a description and Introduction to playing the game and 
how the game works- 

Dooumentation should be typed on one side of blank 
A4 paper with double spacing between lines and a wide 

We pay well for all listings published. 

If you want to send us your program then fill in the 
form. And send us the tape, documentation, eoupon, 
and an SAE If you want it returned, to the following 
address: 
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LISTING 1 



0 POKE 4096.0;POKE 44.16!NEW 
READY. 



LISTING Z 



0 FOR A-2049 TO 2B91 

1 READ D:IF N-i? THEN GOSUB 4;G0T0 1 

2 POKE A.D:P“P+D AND 255 ; N-N+1 : NEXT 

3 READ D; GOSUB 4; POKE 44,8; POKE 45.76 ;PO 
KE 46,n;CLR:END 

4 L=PEEK(631 ;IF P-D THEN PRINT "ERROR AH 
OUND LINE":L:END 

5 PRINT ‘'LINE";L;"OK":P-0:N=0:RETURN 

6 DATA 11,8,0.0.156,50.48.54.49.0.0,0.12 
0.169,13.162.8.82 

7 DATA 141.250.255.142.251.255.160.0.132 
.2,132.3,140.21,208,169.1.214 

8 DATA 153.0.4.153,0.5,153,0.6,153.232.6 
,169,5,153.0.216.128 

9 DATA 153,0.217.153,0,218.153.232.218,2 
00.206,225.169,59,141,17.208.11 

10 DATA 141.32,208.141,33,208.169.24,141 
.24,208, 141.22,203.32,6.9.211 

11 DATA 152.32,40,10.32.44.9,169.254.32. 

28.10.77.0. 220.41.16.142 

12 DATA 208.244.32.6,9.32.38,10.32,44.9, 
32,35.9.136,48,250,150 

13 DATA 32.38.10.169.100,133.21.133.22,1 
69.39.133,19.169,120.133,20,180 

14 DATA 169.4,133,24,10.133,23,169.255.1 

41.0. 220.77.0.220.41.15.98 

15 DATA 208.5,160,0,32.151,10,133.16,32. 
93.10.32.126,10.232.169.139 

16 DATA 255,32.28.10,41.31.208.5.160,5.3 
2.151.10.133,17.32,93.219 

17 DATA 10,32,126.10.32.35.9,169.1.133,8 
. 166.19.164,21.32.191.134 

18 DATA 9,165.11,133.26,6.8.166.20,164 2 

2.32.191.9.162.0. 165.9 

19 DATA 11.208.6.165,26.208.28.240.169.1 
60,85.165.26.208.10.160.96.179 

20 DATA 169,0.56.248,117.2.149.2,152.32, 
40.10.32.77,9.76,93.240 

21 DATA 8.160,108.232.208.233,162.31.160 
.64,132.7,169.0.133.6.198.219 

22 DATA 7.136.145,6,208,251.202.208.246. 
169 . 255 , 1S3 .32,32. 200 . 208 . 250 . 148 

23 DATA 96,162.255.236.18.208.208.251.23 

2.96.160.8.162.0. 32.191.9.20 

24 DATA 162.159.32.193.9,164.10.200,192. 
200.144.239,202.160.8.32.191,249 

25 DATA 9,160.199,32,191,9.202.208.243,1 
60.32.169,255.153.255,31.153.157 

26 DATA 31.33.136,208.247.132,9,200.132, 
10.200, 132.8.165,2,32.111.252 
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27 DATA 9,169,144,133.9.70,8.165 3 72 74 
.74.74.74.32.122.9.217 

28 DATA 104.41.15,9,48.170,169,33 133 1 
169,104,133,7,138.10.10,14 

29 DATA 10,30.7.133,6.160,0,177.6.133.25 
.162.8.6.25.144.3.19 

30 DATA 32.195,9.230.9.202.208,244 24 23 
0.10,230.6.165.6.41.7.56 

31 DATA 240,6.165,9,233.7.133.9,176 219 
165.10.233.7,133, 10.169.134 

32 DATA 37,133,1.96.132.10,134.9.165 9 1 
0.72.169.32.105,0,133,223 

33 DATA 15.104,41.248.133.14.165,10 41 7 
.5.14.133.14.165,10,74.169 

34 DATA 74.74.133.64.165,14.164.15 198 6 

4.48.9.24.105.64. 144.1.80 

35 DATA 200,200,208.243.133,14.132.15,16 
5,9.41,3.73,3,168.169,3.243 

36 DATA 133,11.165.8,136.48.8.6 11 6 11 
10.10,144.245,200,81.209 

37 DATA 14.72.177.14.37.11.133,11,104,14 

5.14.96.141.0. 220.173.1 83 

38 DATA 220,73.255,168,96,169.72.160,3 1 
•32.8,216.24.105,212.133,12.10 

39 DATA 169.10.105.0,133,13.32.82.10 133 
.9.32,82.10,133.10.32,227 

40 DATA 82,10.240,10.72.32.124,9 104 48 

244 .10.48. 231 . 96 . 160 . 0 . 240 

41 DATA 177.12.230.12.208,2.230.13.96 16 
0.0,136,74.208,252.42.200.4 

42 DATA 48,252.133,26,181.23.201,4,176 2 
.73.15.73,12. 197 , 26 , 240, 146 

43 DATA 6.165,26.240.2.149.23.96 181 23 
74.144.2.214.21.74.144,48 

44 DATA 2,246.21,74.144,2,214,19 74 144 

4.246.19.169.0. 96.169.107 

45 DATA 255,141,0.220.77,1.220,208 243 1 

85.184.10.240.17.141.0. 220.58 

46 DATA 173.1.220,57,194,10,240.3.200 20 
8.227.185.203.10.96.253,253,229 

47 DATA 253,251.0,223.223,191.191,0.2 4 

16.4.0. 64.32.128.32.78 

48 DATA 1.4.2,8,0.1,4.2.8,39.71.212 200 

197.224.194.193.80 

49 DATA 212,212.204.69.39.82.215.210 201 
.212,212,197.206,224.194.89,11 229 

50 DATA 93.194,197,210.199.213.210 224 2 
10.193.199.206.193.210,211.211.207.52 

51 DATA 78,35.104.201,206.224.177.185 18 
4,182.224.198.207.82,23.115.195.60 

52 DATA 207.205.200.213,212,197.210 224 
199.193.205, 197,18,35.95.199,197 198 

53 DATA 212.224.210.197.193.196,217 224 
33.44.1.206,207.224,215,201,206,194 

54 DATA 206.197.18,32.1,194.204 193 195 
203.224.215.201.206.19.32.1.37 

55 DATA 215,200,201.212.197.224.215 201 
206,19.98 

READY. 
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ACTIVISION 



PITTALLII 

SPACE PILOT 2 

PSVTRON 

FALL GUY 

DEMONS OF TOPAZ 

SHEEP IN SPACE 

KONG STRIKES BACK 

BLACK THUNDER 

DEATH STAR INTERCEPTOR 

TALUOEGA 



ACTIVISION 

AMROG 

BEYOND 

ELITE 

FIREBIRD 

LLAMASOFT 

OCEAN 

QUICKSILVA 

SYSTEM 3 



PSVTRON BEYOND 

FALL GUY ELITE 

AD ASTRA GARGOYLE 

SAM STOAT SAFEBREAKER GREMLIN GRAPHICS 
SPLAT INCENTIVE 

MUGSY MELBOURNE house 

KONG STRIKES BACK OCEAN 

CHEQUERED FLAG PSION 

BLUE MAX u.S. GOLD 
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